Changeset 8

Timestamp:

Oct 10, 2007, 7:42:25 PM (11 years ago)

Author:

gz

Message:

compiler:with-optimization-level is Lispworks-only

File:

• lw-branch/load-wood.lisp (modified) (1 diff)

lw-branch/load-wood.lisp

@@ -190 +190 @@
               (not (probe-file fasl))
               (> (file-write-date lisp) (file-write-date fasl)))
+      #+LispWorks
       (compiler:with-optimization-level
         (if *debug-wood*
           (compiler::set-optimization-level :safety 3 :debug 3)
           (compiler::set-optimization-level :speed 3 :safety 0 :debug 0 :float 0))
-        (compile-file lisp :verbose t)))))
+        (compile-file lisp :verbose t))
+      #-LispWorks
+      (compile-file lisp :verbose t))))
 
 (defun compile-and-load (file &optional force-compile)