[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gcl-devel] ansi-test
From: |
Sam Steingold |
Subject: |
[Gcl-devel] ansi-test |
Date: |
16 Dec 2002 23:46:16 -0500 |
User-agent: |
Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 |
IMO ansi-test suffers from two _major_ flaws:
1. The tests do not carry a note of _what_ they test.
Paul said that he creates the tests by reading CLHS.
This every test should carry a note at to what section it tests.
2. Reproducibility: I am told that STRUCT-TEST-33/5 fails. I do
[]> do-test 'STRUCT-TEST-35/7)
Test STRUCT-TEST-35/7 failed
Form:
(LET ((#:X1799 (MAKE-STRUCT-TEST-35)))
(AND
(LET ((#:T1800 '#:G1796)) (SETF (STRUCT-TEST-PACKAGE::A35 #:X1799) #:T1800)
(EQLT (STRUCT-TEST-PACKAGE::A35 #:X1799) #:T1800))
(LET ((#:T1800 '#:G1797)) (SETF (STRUCT-TEST-PACKAGE::B35 #:X1799) #:T1800)
(EQLT (STRUCT-TEST-PACKAGE::B35 #:X1799) #:T1800))
T))
Expected value: T
Actual value: #<SYSTEM::SIMPLE-UNDEFINED-FUNCTION #x204CD3B9>.
NIL
this is not helpful: I am not told what has happened, what is being
tested, why T was expected and what function was not defined.
When I try to evaluate the form, I have to strip the `#:' by hand.
Please avoid gensyms!
thanks.
--
Sam Steingold (http://www.podval.org/~sds) running RedHat8 GNU/Linux
<http://www.camera.org> <http://www.iris.org.il> <http://www.memri.org/>
<http://www.mideasttruth.com/> <http://www.palestine-central.com/links.html>
In the race between idiot-proof software and idiots, the idiots are winning.
- [Gcl-devel] ansi-test,
Sam Steingold <=