Update of /project/elephant/cvsroot/elephant/src/elephant In directory clnet:/tmp/cvs-serv13013/src/elephant

Modified Files: variables.lisp Log Message: Fixed circular name dependency due to new asdf load order

--- /project/elephant/cvsroot/elephant/src/elephant/variables.lisp 2007/03/30 14:34:35 1.11 +++ /project/elephant/cvsroot/elephant/src/elephant/variables.lisp 2007/03/30 17:28:50 1.12 @@ -58,6 +58,18 @@ "The transaction which is currently in effect.")

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +;; Forward references +;; +;; Elephant needs to export these symbols in order to +;; properly load in asdf due to some circular dependencies +;; between lisp files + +(eval-when (load-toplevel compile-toplevel) + (mapcar (lambda (symbol) + (intern symbol :elephant)) + '(get-cached-instance))) + +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;; Utilities

;; get rid of spot idx and adjust the arrray