From: Sam S. <sd...@gn...> - 2003-05-17 23:39:26
|
> * In message <Pin...@as...> > * On the subject of "Re: configure --build fails check stage" > * Sent on Sat, 17 May 2003 15:48:04 -0700 (PDT) > * Honorable Kaz Kylheku <ka...@as...> writes: > > Here is the simplest of all possible ways to address this. > > diff -u clisp/src/init.lisp:1.8 clisp/src/init.lisp:1.8.4.1 > --- clisp/src/init.lisp:1.8 Mon May 5 22:50:21 2003 > +++ clisp/src/init.lisp Sat May 17 16:44:20 2003 > @@ -1523,12 +1523,20 @@ > > (PROGN > > -;; The BACKQUOTE macro just calls the backquote expander on its argument. > +;; The BACKQUOTE macro works like this. If the form has two elements, > +;; then it calls the backquote expander on the second element. The > +;; expansion is cached by destructively adding it as a third element > +;; to the form. If the form to be expanded has three elements, then > +;; it's assumed that the third element is the cached expansion, > +;; which is just retrieved. > (sys::%putd 'sys::backquote > (sys::make-macro > (function sys::backquote (lambda (form env) > (declare (ignore env)) > - (sys::bq-expand (second form)))))) > + (if (cddr form) > + (third form) > + (third (nconc form > + (list (sys::bq-expand (second form)))))))))) > > ;; The BQ-NCONC form is a marker used in the backquote-generated code. > ;; It tells the optimizer that the enclosed forms may be combined with interesting. please look at compiler.fas: you will find a lot of read labels (like #123=(COMMON-LISP::MASK-FIELD . SYSTEM::C-MASK-FIELD)) which are never referenced. could you please look at why this happens? -- Sam Steingold (http://www.podval.org/~sds) running RedHat9 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> Don't use force -- get a bigger hammer. |