[movitz-cvs] CVS update: movitz/special-operators.lisp

[Frode Vatvedt Fjeld]

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 at 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