26 Jan
2009
26 Jan
'09
10 p.m.
Stas Boukarev <stassats@gmail.com> writes:
Here it is:
diff -u -r1.157 swank-openmcl.lisp --- swank-openmcl.lisp 16 Jan 2009 15:49:40 -0000 1.157 +++ swank-openmcl.lisp 26 Jan 2009 20:31:48 -0000 @@ -925,6 +925,9 @@ (< (symbol-value s) 255)) (setf (gethash (symbol-value s) *value2tag*) s)))
+(defimplementation macroexpand-all (form) + (ccl:macroexpand-all form)) + ;;;; Inspection
(defimplementation describe-primitive-type (thing)
This will cause a reader-error at read-time on older versions of CCL. Look at SBCL-WITH-SYMBOL in swank-sbcl.lisp for how this is usually dealt with in a backwards-compatible manner. -T.