[gsharp-cvs] CVS update: gsharp/Flexichain/utilities.lisp

[Timothy Moore]

Update of /project/gsharp/cvsroot/gsharp/Flexichain
In directory common-lisp.net:/tmp/cvs-serv4778

Modified Files:
	utilities.lisp 
Log Message:
Fixed non-openmcl typo
Date: Sat Jan 15 09:43:50 2005
Author: tmoore

Index: gsharp/Flexichain/utilities.lisp
diff -u gsharp/Flexichain/utilities.lisp:1.2 gsharp/Flexichain/utilities.lisp:1.3
--- gsharp/Flexichain/utilities.lisp:1.2	Fri Jan 14 17:12:41 2005
+++ gsharp/Flexichain/utilities.lisp	Sat Jan 15 09:43:50 2005
@@ -40,8 +40,8 @@
 ;;;
 ;;; TODO: check other CL implementations behavior wrt. return values
 (defclass weak-pointer-container-mixin ()
-  #+openmcl
-  ((weak-hash :initform (make-hash-table :test #'eq :weak :value)))
+  (#+openmcl
+   (weak-hash :initform (make-hash-table :test #'eq :weak :value)))
   (:documentation "Support for weak references, if needed"))
 
 (defgeneric make-weak-pointer (object container))