diff options
Diffstat (limited to 'src/interp')
| -rw-r--r-- | src/interp/debug.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/debug.lisp b/src/interp/debug.lisp index 344838c5..fbcdc575 100644 --- a/src/interp/debug.lisp +++ b/src/interp/debug.lisp @@ -965,7 +965,7 @@ EXAMINE (SETQ RECNO (NOTE |$InputStream|)) (defvar |$TraceFlag| t) (defvar |depthAlist| nil) -(defun WHOCALLED nil nil) +(defun WHOCALLED (x) (declare (ignore x)) nil) (defun /MONITORX (/ARGS FUNCT OPTS &AUX NAME TYPE TRACECODE COUNTNAM TIMERNAM BEFORE AFTER CONDITION BREAK TRACEDMODEMAP |