From 30909eee9baffe5d173010ba1174fcb6b8885c49 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Fri, 20 Dec 1991 18:16:30 +0000 Subject: [PATCH] Upped the safety and debug-info for pathname and filesys. --- tools/worldcom.lisp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/tools/worldcom.lisp b/tools/worldcom.lisp index 05bf18f3c..c2f85fd26 100644 --- a/tools/worldcom.lisp +++ b/tools/worldcom.lisp @@ -140,8 +140,10 @@ (comf "target:code/serve-event") (pushnew :serve-event *features*) (comf "target:code/fd-stream") -(comf "target:code/pathname") -(comf "target:code/filesys") +(with-compilation-unit ; Until this code is shaken down more... + (:optimize '(optimize (safety 2) (debug 2))) + (comf "target:code/pathname") + (comf "target:code/filesys")) (comf "target:code/load") (comf "target:code/eval") -- GitLab