Commit 9049678a authored by pfdietz's avatar pfdietz

Turn off ASH generation in cmucl, where it still causes too many errors. Make...

Turn off ASH generation in cmucl, where it still causes too many errors.  Make second form be uncompiled in gcl as well as clisp.
parent 3164c0c6
......@@ -39,7 +39,9 @@
(defvar *maximum-random-int-bits* 45)
(defvar *compile-unoptimized-form* #-clisp t #+clisp nil)
(defvar *compile-unoptimized-form*
#-(or gcl clisp) t
#+(or gcl clisp) nil)
(declaim (special *vars*))
......@@ -143,6 +145,7 @@
`(,op ,(make-random-integer-form (1- size)))))
(2 `(isqrt (abs ,(make-random-integer-form (- size 2)))))
#-cmu
(2
(destructuring-bind (s1 s2)
(random-partition (- size 2) 2)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment