[movitz-cvs] CVS update: movitz/losp/x86-pc/debugger.lisp

Frode Vatvedt Fjeld ffjeld at common-lisp.net
Wed Apr 20 06:54:07 UTC 2005


Update of /project/movitz/cvsroot/movitz/losp/x86-pc
In directory common-lisp.net:/tmp/cvs-serv20378

Modified Files:
	debugger.lisp 
Log Message:
Removed obsolete (get-global-property :setf-namespace) code.

Date: Wed Apr 20 08:54:07 2005
Author: ffjeld

Index: movitz/losp/x86-pc/debugger.lisp
diff -u movitz/losp/x86-pc/debugger.lisp:1.37 movitz/losp/x86-pc/debugger.lisp:1.38
--- movitz/losp/x86-pc/debugger.lisp:1.37	Wed Mar  9 08:22:32 2005
+++ movitz/losp/x86-pc/debugger.lisp	Wed Apr 20 08:54:07 2005
@@ -10,7 +10,7 @@
 ;;;; Author:        Frode Vatvedt Fjeld <frodef at acm.org>
 ;;;; Created at:    Fri Nov 22 10:09:18 2002
 ;;;;                
-;;;; $Id: debugger.lisp,v 1.37 2005/03/09 07:22:32 ffjeld Exp $
+;;;; $Id: debugger.lisp,v 1.38 2005/04/20 06:54:07 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -630,7 +630,7 @@
 			  (location-in-object-p (%run-time-context-slot slot-name)
 						instruction-location))
 		 (return (values slot-name :run-time-context))))
-	(with-hash-table-iterator (hashis (get-global-property :setf-namespace))
+	(with-hash-table-iterator (hashis *setf-namespace*)
 	  (do () (nil)
 	    (multiple-value-bind (morep setf-name symbol)
 		(hashis)




More information about the Movitz-cvs mailing list