Changeset 2602

Show
Ignore:
Timestamp:
02/23/08 22:33:41 (11 months ago)
Author:
hans
Message:

fix build script again

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/bknr/datastore/src/data/object.lisp

    r2600 r2602  
    5050  (declare (ignore args)) 
    5151  (determine-transient-slot-initargs class) 
    52   (when *store* 
     52  (when (and (boundp '*store*) *store*) 
    5353    (update-instances-for-changed-class (class-name class)) 
    5454    (unless *suppress-schema-warnings* 
  • trunk/build.lisp

    r2601 r2602  
    3939  (unix:unix-exit code)) 
    4040 
    41 (defun load-all () 
    42   (asdf:oos 'asdf:load-op :bknr.web) 
    43   (asdf:oos 'asdf:load-op :quickhoney) 
    44   (asdf:oos 'asdf:load-op :bos.web) 
    45   (asdf:oos 'asdf:load-op :lisp-ecoop) 
    46   (asdf:oos 'asdf:load-op :bknr.datastore.test)) 
     41#+openmcl 
     42(defun dump-image () 
     43  ;; does not yet work,  
     44  (trace ccl::close-shared-library) 
     45  (dolist (lib ccl::*shared-libraries*) 
     46    (ccl::close-shared-library lib :completely t)) 
     47  (ccl:save-application "bknr.image")) 
     48 
     49(setup-registry (probe-file *default-pathname-defaults*)) 
     50 
     51(asdf:oos 'asdf:load-op :bknr.web) 
     52(asdf:oos 'asdf:load-op :quickhoney) 
     53(asdf:oos 'asdf:load-op :bos.web) 
     54(asdf:oos 'asdf:load-op :lisp-ecoop) 
     55(asdf:oos 'asdf:load-op :bknr.datastore.test) 
    4756 
    4857(defun build () 
    49   (clean-fasls) 
    50   (load-all) 
    5158  (exit 0)) 
    5259 
    5360(defun test () 
    54   (load-all) 
    5561  (exit (if (and (unit-test:run-all-tests) 
    5662                 ) 
    5763            0 1))) 
    58  
    59 (setup-registry (probe-file *default-pathname-defaults*)) 
    60  
    61