diff options
Diffstat (limited to 'src/interp/debug.lisp.pamphlet')
| -rw-r--r-- | src/interp/debug.lisp.pamphlet | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/debug.lisp.pamphlet b/src/interp/debug.lisp.pamphlet index 48c415fa..b4ceeed3 100644 --- a/src/interp/debug.lisp.pamphlet +++ b/src/interp/debug.lisp.pamphlet @@ -114,7 +114,7 @@ exit (rds ifile) ; PURPOSE: Debugging hooks for Boot code (in-package "BOOT") -(use-package '("LISP" "VMLISP")) +(use-package '("LISP" )) (DEFPARAMETER /COUNTLIST NIL) (DEFPARAMETER /TIMERLIST NIL) @@ -281,7 +281,7 @@ exit (rds ifile) ;; next is done in case the diskmode changed (SHUT INPUTSTREAM) )) ;;(SETQ INFILE (|pathname| (IFCAR ($LISTFILE INFILE)))) - (SETQ INFILE (vmlisp::make-input-filename INFILE)) + (SETQ INFILE (make-input-filename INFILE)) (MAKEPROP /FN 'DEFLOC (CONS RECNO INFILE)) (SETQ oft (|object2Identifier| (UPCASE (|pathnameType| INFILE)))) |