Update of /project/cells/cvsroot/cells In directory clnet:/tmp/cvs-serv18364

Modified Files: constructors.lisp Log Message: Changed: Moved all symbol exports to beginning of file. Removed: c?+n constructor was defined twice in file.

--- /project/cells/cvsroot/cells/constructors.lisp 2007/11/30 16:51:18 1.17 +++ /project/cells/cvsroot/cells/constructors.lisp 2007/12/02 18:28:04 1.18 @@ -19,15 +19,28 @@ (in-package :cells)

(eval-now! - (export '(c?n))) + (export '(.cache-bound-p + + ;; Cells Constructors + c?n + c?once + c?n-until + c?1 + c_1 + c?+n + + ;; Debug Macros and Functions + c?dbg + c_?dbg + c-input-dbg + + )))

;___________________ constructors _______________________________

(defmacro c-lambda (&body body) `(c-lambda-var (slot-c) ,@body))

-(export! .cache-bound-p c?+n) - (defmacro c-lambda-var ((c) &body body) `(lambda (,c &aux (self (c-model ,c)) (.cache (c-value ,c)) @@ -72,8 +85,6 @@ :rule (c-lambda ,@body) ,@args))

-(export! c?once c?n-until c?1 c_1) - (defmacro c?once (&body body) `(make-c-dependent :code '(without-c-dependency ,@body) @@ -114,8 +125,6 @@ :lazy :until-asked :rule (c-lambda ,@body)))

-(export! c?dbg c_?dbg c-input-dbg) - (defmacro c_?dbg (&body body) "Lazy until asked, then eagerly propagating" `(make-c-dependent