Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv3505

Modified Files: detritus.lisp Log Message: Changed: Wrappred dependencies to AllegroCL and its IDE into #+ ...

--- /project/cells/cvsroot/cells/utils-kt/detritus.lisp 2007/11/30 16:51:20 1.14 +++ /project/cells/cvsroot/cells/utils-kt/detritus.lisp 2007/12/03 12:22:41 1.15 @@ -59,6 +59,7 @@ (defun collect-if (test list) (remove-if-not test list))

+#+(and allegro ide) (defun test-setup () #-its-alive! (ide.base::find-new-prompt-command @@ -67,14 +68,17 @@ #+test (test-setup)

+#+(and allegro ide) (defun test-prep () (test-setup)) + +#+(and allegro ide) (defun test-init () (test-setup))

+#+(and allegro ide) (export! test-setup test-prep test-init)

- ;;; --- FIFO Queue -----------------------------

(defun make-fifo-queue (&rest init-data)