Greetings!  

test-random-types3 spit this out after a 10000 10 run:

(((AND (OR (OR (NOT (AND NIL RATIO NIL))) (COMPLEX (INTEGER * 12800))))
  (NOT (CONS (CONS (CONS T T)
                   (CONS (COMPLEX (REAL 78460 78460)) (EQL -3905)))
             (EQL -285003020)))))

do I understand right that this means the tester thinks

(subtypep '(AND (OR (OR (NOT (AND NIL RATIO NIL))) (COMPLEX (INTEGER * 12800))))
' (NOT (CONS (CONS (CONS T T)
                   (CONS (COMPLEX (REAL 78460 78460)) (EQL -3905)))
             (EQL -285003020))))

is wrong?  We're returning nil t at present, which looks right here.

Take care,
-- 
Camm Maguire                                            [EMAIL PROTECTED]
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah


_______________________________________________
Gcl-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/gcl-devel

Reply via email to