Update of /project/movitz/cvsroot/movitz In directory common-lisp.net:/tmp/cvs-serv16532

Modified Files: special-operators.lisp Log Message: Add a continue/ignore restart for the "won't defun a common-lisp symbol" error.

Date: Tue Sep 21 15:01:27 2004 Author: ffjeld

Index: movitz/special-operators.lisp diff -u movitz/special-operators.lisp:1.39 movitz/special-operators.lisp:1.40 --- movitz/special-operators.lisp:1.39 Fri Sep 17 13:12:49 2004 +++ movitz/special-operators.lisp Tue Sep 21 15:01:23 2004 @@ -8,7 +8,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Fri Nov 24 16:22:59 2000 ;;;; -;;;; $Id: special-operators.lisp,v 1.39 2004/09/17 11:12:49 ffjeld Exp $ +;;;; $Id: special-operators.lisp,v 1.40 2004/09/21 13:01:23 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------

@@ -1211,8 +1211,6 @@ ;; * 8 target jumper number ;; * 4 target catch tag ;; * 0 target EBP -;;; `((:load-lexical ,dynamic-slot-binding :edx) -;;; ()) `((:load-lexical ,dynamic-slot-binding :edx) (:locally (:movl :edx (:edi (:edi-offset raw-scratch0)))) ; final continuation (:load-lexical ,next-continuation-step-binding :edx) ; next continuation-step