[elephant-cvs] CVS elephant/src/elephant

[ieslick]

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