[movitz-cvs] CVS movitz/losp/muerte

[ffjeld]

Update of /project/movitz/cvsroot/movitz/losp/muerte
In directory clnet:/tmp/cvs-serv3803

Modified Files:
	primitive-functions.lisp 
Log Message:
Bounds-check of the stack while unwinding can be problematic. Don't.


--- /project/movitz/cvsroot/movitz/losp/muerte/primitive-functions.lisp	2008/03/15 20:58:08	1.70
+++ /project/movitz/cvsroot/movitz/losp/muerte/primitive-functions.lisp	2008/03/21 22:28:26	1.71
@@ -10,7 +10,7 @@
 ;;;; Author:        Frode Vatvedt Fjeld <frodef at acm.org>
 ;;;; Created at:    Tue Oct  2 21:02:18 2001
 ;;;;                
-;;;; $Id: primitive-functions.lisp,v 1.70 2008/03/15 20:58:08 ffjeld Exp $
+;;;; $Id: primitive-functions.lisp,v 1.71 2008/03/21 22:28:26 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -138,7 +138,7 @@
     
    search-loop
     (:jecxz '(:sub-program () (:int 63)))
-    (:locally (:bound (:edi (:edi-offset stack-bottom)) :ecx))
+    ;; (:locally (:bound (:edi (:edi-offset stack-bottom)) :ecx))
 
     (:cmpl :ecx :eax)
     (:je 'found-dynamic-env)