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