[cells-cvs] CVS update: cell-cultures/config.lisp cell-cultures/build.lisp cell-cultures/cello-config.lisp

[Kenny Tilton]

Update of /project/cells/cvsroot/cell-cultures
In directory common-lisp.net:/tmp/cvs-serv5472

Modified Files:
	build.lisp cello-config.lisp 
Added Files:
	config.lisp 
Log Message:

Date: Sun Jul  4 11:59:40 2004
Author: ktilton



Index: cell-cultures/build.lisp
diff -u cell-cultures/build.lisp:1.1 cell-cultures/build.lisp:1.2
--- cell-cultures/build.lisp:1.1	Sat Jun 26 11:38:32 2004
+++ cell-cultures/build.lisp	Sun Jul  4 11:59:39 2004
@@ -25,12 +25,15 @@
         :type "lisp")
        *devel-root*))
 
+;;; --- teach ASDF about LPR files
+(let ((d-force t))
+  (build-sys d-force "asdf-aclproj"))
 
 #-allegro-ide 
 (let ((d-force t))
   (pushnew :cells-testing *features*)
-  (build-sys d-force "cello" "cells")
-  (build-sys d-force "cello" "cells" "cells-test"))
+  (build-sys d-force "cells")
+  (build-sys d-force "cells" "cells-test"))
 
 #-allegro-ide 
 (let ((d-force nil))


Index: cell-cultures/cello-config.lisp
diff -u cell-cultures/cello-config.lisp:1.1 cell-cultures/cello-config.lisp:1.2
--- cell-cultures/cello-config.lisp:1.1	Sat Jun 26 11:38:32 2004
+++ cell-cultures/cello-config.lisp	Sun Jul  4 11:59:39 2004
@@ -1,9 +1,5 @@
 (in-package :cl-user)
 
-(defparameter *devel-root* 
-  (make-pathname #+lispworks :host #-lispworks :device "c"
-    :directory `(:absolute "dvl")))
-
 (defparameter *cello-directory*
   (merge-pathnames
    (make-pathname :directory `(:relative "cello"))