From: Alexey D. <ade...@us...> - 2003-09-02 11:12:23
|
Update of /cvsroot/sbcl/sbcl/src/code In directory sc8-pr-cvs1:/tmp/cvs-serv31598/src/code Modified Files: defboot.lisp Log Message: 0.8.3.25: * Fix bug 277: IGNORE/IGNORABLE declarations should work for symbol macros; * fix bug in CERROR recognition inside RESTART-CASE. Index: defboot.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/code/defboot.lisp,v retrieving revision 1.36 retrieving revision 1.37 diff -u -d -r1.36 -r1.37 --- defboot.lisp 26 Aug 2003 13:21:18 -0000 1.36 +++ defboot.lisp 2 Sep 2003 11:11:46 -0000 1.37 @@ -383,7 +383,7 @@ ,n-cond (car *restart-clusters*) ,(if (eq name 'cerror) - `(cerror ,(second expression) ,n-cond) + `(cerror ,(second exp) ,n-cond) `(,name ,n-cond)))) expression)) expression))) |