aboutsummaryrefslogtreecommitdiff
path: root/src/interp/monitor.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/monitor.lisp')
-rw-r--r--src/interp/monitor.lisp8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/interp/monitor.lisp b/src/interp/monitor.lisp
index c6f5c35b..167342cc 100644
--- a/src/interp/monitor.lisp
+++ b/src/interp/monitor.lisp
@@ -334,10 +334,10 @@
(monitor-file name))))
(defun monitor-autoload ()
- "traces autoload of algebra to monitor corresponding source files"
- (trace (loadvol
- :entrycond nil
- :exitcond (progn (monitor-dirname system::arglist) nil))))
+ "traces autoload of algebra to monitor corresponding source files"
+ #+:GCL(trace (loadvol
+ :entrycond nil
+ :exitcond (progn (monitor-dirname system::arglist) nil))))
(defun monitor-nrlib (nrlib)
"takes an nrlib name as a string (eg POLY) and returns a list of