;Reading at top level in Lisp Listener 1. ;Reading in base 10 in package STEVE with standard Zetalisp readtable. (User:make-macsyma'steve :recompile :noconfirm :batch) The automatic garbage collector is enabled. There are 6,828,167 words of dynamic space, 298,321 words of static space, and 23,568,660 words of free space. Free space consists of 21,561,344 words of unallocated storage plus 1/2 of the 4,014,557 words of storage already allocated to specific regions but not yet used. Dynamic space storage distribution: Level Current Size Threshold Mode 3 6,401 216,268 Flips when size exceeds threshold. 2 16,375 648,806 Flips when size exceeds threshold. 1 2,146,023 None Automatic flipping disabled. 0 4,659,368 None Automatic flipping disabled. lm:tmp; lm:tmp; Compiling DJ: GJCX.STEVE; NILCOMPAT.LISP#> Loading DJ: GJCX.STEVE; NILCOMPAT.QFASL#> Compiling DJ: GJCX.STEVE; VARS.LISP#> Loading DJ: GJCX.STEVE; VARS.QFASL#> Variable *TTY-HEIGHT* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *TTY-WIDTH* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-CURSOR* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *EDITOR-BUFFER* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *.* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *B* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *MAJOR-MODE* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-CURRENT-KEY* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *EDITOR-LAST-COMMAND* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-COMMAND-COUNT* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-RUNNING* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-DEVICE-MODE* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *BUFFER-NAME-COMPLETION-ON-RETURN* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *SINGLE-SPACE-SENTENCE-DELIMITER* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *PARAGRAPH-TEXT-STYLE* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *LISP-LISTENER* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ECHO.#. Variable *OVERWRITE-MODE* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ECHO.#. Variable *DISPLAY-MATCHING-PAREN* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ECHO.#. Variable MINIMUM-DISPLAY-TIME being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; ECHO.#. Variable *FUNCTION-SEARCH* being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; DEFSRCH.#. Variable COMMENT-START being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; COMMENT.#. Variable COMMENT-BEGIN being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; COMMENT.#. Variable COMMENT-END being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; COMMENT.#. Variable COMMENT-COLUMN being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; COMMENT.#. Variable COMMENT-MULTI-LINE being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; COMMENT.#. Variable DEFAULT-MAJOR-MODE-ALIST being redefined by file DJ: GJCX.STEVE; VARS.#. It was previously defined by file DJ: GJCX.STEVE; MODES.#. Compiling DJ: GJCX.STEVE; EM.LISP#> << While compiling (:METHOD BUFFER :SET-FILE-NAME) >> PATHNAME is not a known type specifier << While compiling COPY-BP >> The variable DRIFT? is bound but never used. << While compiling INSERT-STRING >> The variable BUFFER is bound but never used. << While compiling DELETE-CHAR >> The variable BUFFER is bound but never used. << While compiling (:METHOD FORWARD-BUFFER-STREAM :UNTYI) >> The variable CHAR is bound but never used. << While compiling (:METHOD FORWARD-BUFFER-STREAM :UNREAD-CHAR) >> The variable CHAR is bound but never used. << While compiling (:METHOD FORWARD-BUFFER-STREAM :READLINE) >> The variable EOF-VALUE is bound but never used. The following functions were referenced but don't seem defined: GET-A-BYTE referenced by (:METHOD BP :BACKWARD-OVER-SYNTAX), (:METHOD BP :FORWARD-OVER-SYNTAX) STRING-SUBSEQ referenced by (:METHOD FORWARD-BUFFER-STREAM :READLINE) Loading DJ: GJCX.STEVE; EM.QFASL#> Variable LINE-NOT-MODIFIED being redefined by file DJ: GJCX.STEVE; EM.#. It was previously defined by file DJ: GJCX.STEVE; REDIS.#. Variable BUFFER-ACCESS-ANY being redefined by file DJ: GJCX.STEVE; EM.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable BUFFER-ACCESS-FILE-READ-ONLY being redefined by file DJ: GJCX.STEVE; EM.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable BUFFER-ACCESS-BUFFER-READ-ONLY being redefined by file DJ: GJCX.STEVE; EM.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-REDISPLAY-COUNT* being redefined by file DJ: GJCX.STEVE; EM.#. It was previously defined by file DJ: GJCX.STEVE; REDIS.#. Instance variable MARK-RING of BUFFER being made special because that variable is globally special Instance variable MARK-RING-INDEX of BUFFER being made special because that variable is globally special Compiling DJ: GJCX.STEVE; NEWMACROS.LISP#> << While compiling WITH-BP* >> The variable IGNORE is bound and not ignored. Loading DJ: GJCX.STEVE; NEWMACROS.QFASL#> Compiling DJ: GJCX.STEVE; AUX.LISP#> The atom NIL appeared at top level; this would do nothing at FASLOAD time. << Error in reading >> The special token GLOBAL:CLOSE was read in at top level. The atom NIL appeared at top level; this would do nothing at FASLOAD time. << While compiling STRINGIFY-TAB >> The problems described above were in data preceding the definition of STRINGIFY-TAB. << While compiling READLINE-WITH-EXIT >> The variable B is used free; assumed special. << While compiling READ-SYMBOL >> The variable B is used free; assumed special. << While compiling READ-FILE-NAME >> The variable REASON is bound but never used. << While compiling COMPLETE-BUFFER-NAME >> (STRING-EQUAL NAME BNAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL NAME BNAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH BNAME) LENGTH)) instead. << While compiling PRINT-BUFFER-NAME-COMPLETIONS >> (STRING-EQUAL NAME BNAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL NAME BNAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH BNAME) LENGTH)) instead. << While compiling BUFFER >> PATHNAME is not a known type specifier << While compiling POINT >> PATHNAME is not a known type specifier The following functions were referenced but don't seem defined: STEVE-SI::TTYSCANNER referenced by READ-FILE-NAME GET-A-BYTE referenced by SYNTAX-DESCRIPTION Loading DJ: GJCX.STEVE; AUX.QFASL#> Variable *QUERY-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *NOTIFY-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *MORE-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *FEEDBACK-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *DOUBLE-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *ERROR-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *PREFIX-ECHO-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *OVERWRITE-LINE* being redefined by file DJ: GJCX.STEVE; AUX.#. It was previously defined by file DJ: GJCX.STEVE; REDIS.#. Warning: DJ: GJCX.STEVE; AUX.QFASL#10 was compiled with a different version of macro WITH-DOUBLE-SECOND-LINE Warning: DJ: GJCX.STEVE; AUX.QFASL#10 was compiled with a different version of macro WITH-DOUBLE-LINE Warning: DJ: GJCX.STEVE; AUX.QFASL#10 was compiled with a different version of macro WITH-QUERY-LINE Compiling DJ: GJCX.STEVE; OVER.LISP#> Loading DJ: GJCX.STEVE; OVER.QFASL#> Variable *OVERWRITE-LINE* being redefined by file DJ: GJCX.STEVE; OVER.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Compiling DJ: GJCX.STEVE; ED.LISP#> << While compiling ED >> The variable STEVE-SI::PRINT-GC-MESSAGES is bound but never used. << While compiling EDITOR-TOP-LEVEL >> The variable GUNK-PATHNAME is bound but never used. << Error in reading >> The special token GLOBAL:CLOSE was read in at top level. The atom NIL appeared at top level; this would do nothing at FASLOAD time. << While compiling ED-ABORT >> The problems described above were in data preceding the definition of ED-ABORT. The following functions were referenced but don't seem defined: BIT1P referenced by ED-COMMAND-INTERPRET Loading DJ: GJCX.STEVE; ED.QFASL#> Variable *EDITOR-CURSOR* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *EDITOR-BUFFER* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *.* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *B* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *TTY-WIDTH* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *TTY-HEIGHT* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *ARGUMENT* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable ARGUMENT-SUPPLIED? being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *QUERY-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *NOTIFY-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *FEEDBACK-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *DOUBLE-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *ERROR-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *PREFIX-ECHO-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *MORE-LINE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; AUX.#. Variable *EDITOR-CURRENT-KEY* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *EDITOR-LAST-COMMAND* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable RE-GENERATE-SCREEN-REALLY being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *EDITOR-COMMAND-COUNT* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *EDITOR-DEVICE-MODE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *EDITOR-RUNNING* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *MAJOR-MODE* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *BUFFER-NAME-COMPLETION-ON-RETURN* being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable BUFFER-ACCESS-ANY being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EM.#. Variable BUFFER-ACCESS-FILE-READ-ONLY being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EM.#. Variable BUFFER-ACCESS-BUFFER-READ-ONLY being redefined by file DJ: GJCX.STEVE; ED.#. It was previously defined by file DJ: GJCX.STEVE; EM.#. Compiling DJ: GJCX.STEVE; PRLL.LISP#> << While compiling CALCULATE-BUFFER-ENVIRONMENT >> The variable FILE-EXIT-FUNCTIONS-DEFAULT is used free; assumed special. Loading DJ: GJCX.STEVE; PRLL.QFASL#> Compiling DJ: GJCX.STEVE; REDIS.LISP#> << While compiling MAKE-SCREEN-IMAGE >> The variable UNUSED is bound but never used. << While compiling EXPAND-LINE >> The variable I&D-LINE-TOO-SLOW-FLAG is bound but never used. << While compiling REDISPLAY-CONT-LINE >> The variable POINT is bound but never used. Loading DJ: GJCX.STEVE; REDIS.QFASL#> Variable LINE-NOT-MODIFIED being redefined by file DJ: GJCX.STEVE; REDIS.#. It was previously defined by file DJ: GJCX.STEVE; EM.#. Variable CREAMED-TTY-LINES-TO being redefined by file DJ: GJCX.STEVE; REDIS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Variable *OVERWRITE-LINE* being redefined by file DJ: GJCX.STEVE; REDIS.#. It was previously defined by file DJ: GJCX.STEVE; OVER.#. Variable RE-GENERATE-SCREEN-REALLY being redefined by file DJ: GJCX.STEVE; REDIS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-REDISPLAY-COUNT* being redefined by file DJ: GJCX.STEVE; REDIS.#. It was previously defined by file DJ: GJCX.STEVE; EM.#. Compiling DJ: GJCX.STEVE; HASHISH.LISP#> << While compiling (:PROPERTY EDITOR-DEFUN-KEY SOURCE-CODE-REWRITE) >> The variable FORM is bound but never used. << While compiling READ-CANONICAL-CHAR >> The variable G is used free; assumed special. << While compiling BIT-PREFIX >> The variable COMMAND-CHAR is bound but never used. << While compiling QUOTED-INSERT >> The variable COMMAND-CHAR is bound but never used. Loading DJ: GJCX.STEVE; HASHISH.QFASL#> Variable *FUNDAMENTAL-BINDINGS* being redefined by file DJ: GJCX.STEVE; HASHISH.#. It was previously defined by file DJ: GJCX.STEVE; INITBINDS.#. Variable *EDITOR-BINDINGS* being redefined by file DJ: GJCX.STEVE; HASHISH.#. It was previously defined by file DJ: GJCX.STEVE; INITBINDS.#. Compiling DJ: GJCX.STEVE; MODE.LISP#> << While compiling (:PROPERTY :MODE STEVE-SI::FILE-ATTRIBUTE-BINDINGS) >> The variable KWD is bound but never used. The variable PATHNAME is bound but never used. Loading DJ: GJCX.STEVE; MODE.QFASL#> Variable DEFAULT-MAJOR-MODE-ALIST being redefined by file DJ: GJCX.STEVE; MODE.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Compiling DJ: GJCX.STEVE; HASH.LISP#> << While compiling PREFIX-CHARACTER >> The variable TAG is bound but never used. << While compiling DEFINE-EXTENDED >> The variable DOCUMENTATION is bound but never used. The variable NAME is bound but never used. Loading DJ: GJCX.STEVE; HASH.QFASL#> Compiling DJ: GJCX.STEVE; INITBINDS.LISP#> Loading DJ: GJCX.STEVE; INITBINDS.QFASL#> Variable *FUNDAMENTAL-BINDINGS* being redefined by file DJ: GJCX.STEVE; INITBINDS.#. It was previously defined by file DJ: GJCX.STEVE; HASHISH.#. Variable *EDITOR-BINDINGS* being redefined by file DJ: GJCX.STEVE; INITBINDS.#. It was previously defined by file DJ: GJCX.STEVE; HASHISH.#. Compiling DJ: GJCX.STEVE; SCAN.LISP#> << While compiling (:METHOD EDITOR-RUBOUT-HANDLING-STREAM :READ-CHAR) >> The variable U is used free; assumed special. The variable W is used free; assumed special. Loading DJ: GJCX.STEVE; SCAN.QFASL#> Compiling DJ: GJCX.STEVE; METAX.LISP#> << While compiling COMPLETE-COMMAND >> (STRING-EQUAL COMMAND NAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL COMMAND NAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH NAME) LENGTH)) instead. << While compiling COMPLETE-COMMAND? >> (STRING-EQUAL COMMAND NAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL COMMAND NAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH NAME) LENGTH)) instead. The variable VALUES is bound but never used. << While compiling COMMAND-COMPLETION >> (STRING-EQUAL COMMAND NAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL COMMAND NAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH NAME) LENGTH)) instead. The variable VALUES is bound but never used. << While compiling WORD-COMPLETION >> (STRING-EQUAL COMMAND NAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL COMMAND NAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH NAME) LENGTH)) instead. The variable VALUES is bound but never used. << While compiling PRINT-POSSIBLE-COMPLETIONS >> (STRING-EQUAL COMMAND NAME 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL COMMAND NAME :START1 0 :START2 0 :END1 LENGTH :END2 (MIN& (STRING-LENGTH NAME) LENGTH)) instead. The variable VALUES is bound but never used. << While compiling EXTENDED-COMMAND >> The variable MSGFILES is bound but never used. << While compiling INSTANT-EXTENDED-COMMAND >> The variable MSGFILES is bound but never used. The following functions were referenced but don't seem defined: %STRING-MAXPREFIX referenced by WORD-COMPLETION Loading DJ: GJCX.STEVE; METAX.QFASL#> Compiling DJ: GJCX.STEVE; MODES.LISP#> Loading DJ: GJCX.STEVE; MODES.QFASL#> Variable DEFAULT-MAJOR-MODE-ALIST being redefined by file DJ: GJCX.STEVE; MODES.#. It was previously defined by file DJ: GJCX.STEVE; MODE.#. Compiling DJ: GJCX.STEVE; ECHO.LISP#> << While compiling EVALUATE-SEXP-INTO-BUFFER >> The variable VALUE is bound but never used. The following functions were referenced but don't seem defined: ELAPSED-TIME referenced by ECHO-BP, MEDITATE >$ referenced by MEDITATE Loading DJ: GJCX.STEVE; ECHO.QFASL#> Variable *LISP-LISTENER* being redefined by file DJ: GJCX.STEVE; ECHO.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *OVERWRITE-MODE* being redefined by file DJ: GJCX.STEVE; ECHO.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *DISPLAY-MATCHING-PAREN* being redefined by file DJ: GJCX.STEVE; ECHO.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable MINIMUM-DISPLAY-TIME being redefined by file DJ: GJCX.STEVE; ECHO.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Compiling DJ: GJCX.STEVE; EDIO.LISP#> Loading DJ: GJCX.STEVE; EDIO.QFASL#> Compiling DJ: GJCX.STEVE; RECURSE.LISP#> Loading DJ: GJCX.STEVE; RECURSE.QFASL#> Compiling DJ: GJCX.STEVE; SEXP.LISP#> Loading DJ: GJCX.STEVE; SEXP.QFASL#> Compiling DJ: GJCX.STEVE; ARGS.LISP#> << While compiling UNIVERSAL-ARGUMENT >> The variable G is used free; assumed special. The variable FOO is bound but never used. << While compiling READ-POSITIVE-NUMBER >> The variable G is used free; assumed special. << While compiling READ-ARGUMENT-NUMBER >> The variable G is used free; assumed special. << While compiling AUTO-NEGATIVE-DIGIT >> The variable FOO is bound but never used. << While compiling AUTO-ARGUMENT >> The variable FOO is bound but never used. << While compiling NEGATIVE-ARGUMENT >> The variable FOO is bound but never used. << While compiling ARGUMENT-DIGIT >> The variable FOO is bound but never used. The following functions were referenced but don't seem defined: %DIGIT-WEIGHT-TO-CHAR referenced by AUTO-ARGUMENT %DIGIT-CHAR-TO-WEIGHT referenced by AUTO-NEGATIVE-DIGIT, READ-POSITIVE-NUMBER, ED-DIGIT-CHARP, UNIVERSAL-ARGUMENT %DIGIT-CHAR-IN-RADIXP referenced by AUTO-NEGATIVE-DIGIT, READ-POSITIVE-NUMBER, ED-DIGIT-CHARP, UNIVERSAL-ARGUMENT Loading DJ: GJCX.STEVE; ARGS.QFASL#> Variable AUTO-DIGIT-ARG-SAVE being redefined by file DJ: GJCX.STEVE; ARGS.#. It was previously defined by file DJ: GJCX.STEVE; EDKEYS.#. Compiling DJ: GJCX.STEVE; EDKEYS.LISP#> << While compiling EXCHANGE-SUBR-0 >> The variable N is bound but never used. << While compiling SPLIT-LINE >> The variable YPOS is bound but never used. The following functions were referenced but don't seem defined: VALRET referenced by RETURN-TO-SUPERIOR ABS& referenced by CENTER-LINE Loading DJ: GJCX.STEVE; EDKEYS.QFASL#> Variable RE-GENERATE-SCREEN-REALLY being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; REDIS.#. Variable *EDITOR-CURSOR* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-BUFFER* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable *EDITOR-CURRENT-KEY* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable CREAMED-TTY-LINES-TO being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; REDIS.#. Variable *ARGUMENT* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable ARGUMENT-SUPPLIED? being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ED.#. Variable AUTO-DIGIT-ARG-SAVE being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; ARGS.#. Variable *SINGLE-SPACE-SENTENCE-DELIMITER* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable *PARAGRAPH-TEXT-STYLE* being redefined by file DJ: GJCX.STEVE; EDKEYS.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Compiling DJ: GJCX.STEVE; KEYMAC.LISP#> The following functions were referenced but don't seem defined: STEVE-SI::SYMBOL-FUNCTION-DEFINITION referenced by TRY-TO-EXTRACT-KBD-MACRO-DEFINITION Loading DJ: GJCX.STEVE; KEYMAC.QFASL#> Compiling DJ: GJCX.STEVE; COMMENT.LISP#> << While compiling CHANGE-FONT-WORD >> The variable F is used free; assumed special. << While compiling CHANGE-FONT-REGION >> The variable F is used free; assumed special. << While compiling DELETE-FONTS-IN-LINE >> Function %STRING-POSQ called with too many arguments. Warning: Error expanding macro %STRING-POSQ: Too many arguments for %STRING-POSQ. To debug this, recompile with COMPILER:WARN-ON-ERRORS set to NIL. The variable P2 is bound but never used. The variable P1 is bound but never used. The following functions were referenced but don't seem defined: %DIGIT-WEIGHT-TO-CHAR referenced by CHANGE-FONT-REGION, CHANGE-FONT-WORD Loading DJ: GJCX.STEVE; COMMENT.QFASL#> Variable COMMENT-START being redefined by file DJ: GJCX.STEVE; COMMENT.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable COMMENT-BEGIN being redefined by file DJ: GJCX.STEVE; COMMENT.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable COMMENT-END being redefined by file DJ: GJCX.STEVE; COMMENT.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable COMMENT-COLUMN being redefined by file DJ: GJCX.STEVE; COMMENT.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Variable COMMENT-MULTI-LINE being redefined by file DJ: GJCX.STEVE; COMMENT.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Compiling DJ: GJCX.STEVE; KILLS.LISP#> The following functions were referenced but don't seem defined: ABS& referenced by BACKWARD-KILL-LINES-FROM-BP STRING-SUBSEQ referenced by BACKWARD-KILL-ONE-LINE-FROM-BP, KILL-ONE-LINE-FROM-BP, BACKWARD-KILL-LINES-FROM-BP, KILL-LINES-FROM-BP, KILL-BETWEEN-MARKS MOD& referenced by GET-KILL Loading DJ: GJCX.STEVE; KILLS.QFASL#> Compiling DJ: GJCX.STEVE; INDENT.LISP#> << While compiling LISP-INDENTOR >> (STRING-EQUAL TYPE-PNAME "DEF" 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL TYPE-PNAME "DEF" :START1 0 :START2 0 :END1 3 :END2 3) instead. << While compiling PROG-INDENTOR >> The variable START-POS is bound but never used. The variable COUNT is bound but never used. The variable TYPE is bound but never used. The variable BP is bound but never used. << While compiling DEF-HACK-INDENTOR >> The variable START-POS is bound but never used. The variable COUNT is bound but never used. The variable TYPE is bound but never used. << While compiling DEFAULT-INDENTOR >> The variable START-POS is bound but never used. The variable TYPE is bound but never used. << While compiling INDENT-REGION >> The variable LINE is bound but never used. The following functions were referenced but don't seem defined: %STRING-TRANSLATE referenced by GET-ATOM-FOR-INDENTOR-ONLY Loading DJ: GJCX.STEVE; INDENT.QFASL#> Compiling DJ: GJCX.STEVE; MXCOM.LISP#> << While compiling COMPILE-SEXP >> The variable COMPILER-OUTPUT is bound but never used. << While compiling QUERY-REPLACE >> The variable R is used free; assumed special. << While compiling UNDERLINE-REGION >> The variable A is bound but never used. << While compiling DIRECTORY-DISPLAY >> The variable TIME::*MONTH-STRINGS* is used free; assumed special. << While compiling DIRECTORY-DISPLAY-LINE-STRING >> The variable SECONDS is bound but never used. << While compiling ED-DELETE-FILE >> Function DELETE-FILE called with no value supplied for some keyword argument. << While compiling ED-RENAME-FILE >> Function RENAME-FILE called with no value supplied for some keyword argument. The following functions were referenced but don't seem defined: VALRET referenced by SEND-MAIL STRING-SUBSEQ referenced by COPY-MODE-LINE, APPEND-TO-BUFFER STEVE-SI::VMS-DIRECTORY-INFO-PROTECTION-STRING referenced by DIRECTORY-DISPLAY-LINE-STRING %DIGIT-WEIGHT-TO-CHAR referenced by DIRECTORY-DISPLAY-LINE-STRING MAPDIRECTORY referenced by DIRECTORY-DISPLAY TIME::MODE-LANGUAGE-FETCH referenced by DIRECTORY-DISPLAY Loading DJ: GJCX.STEVE; MXCOM.QFASL#> Function SEND-MAIL being redefined by file DJ: GJCX.STEVE; MXCOM.#. It was previously defined by file DJ: GJCX.STEVE; SM.#. Compiling DJ: GJCX.STEVE; EDITOPT.LISP#> Loading DJ: GJCX.STEVE; EDITOPT.QFASL#> Compiling DJ: GJCX.STEVE; HASHINI.LISP#> << While compiling CT-BASIC-INTRA-LINE-EDITING >> The variable KILL-WORD is used free; assumed special. The variable BACKWARD-KILL-WORD is used free; assumed special. Loading DJ: GJCX.STEVE; HASHINI.QFASL#> Compiling DJ: GJCX.STEVE; SYN.LISP#> Loading DJ: GJCX.STEVE; SYN.QFASL#> Compiling DJ: GJCX.STEVE; AUTOFILL.LISP#> Loading DJ: GJCX.STEVE; AUTOFILL.QFASL#> Compiling DJ: GJCX.STEVE; DOW.LISP#> The following functions were referenced but don't seem defined: STEVE-SI::TTYSCANNER referenced by MINIBUFFER Loading DJ: GJCX.STEVE; DOW.QFASL#> Compiling DJ: GJCX.STEVE; SEARCH.LISP#> << While compiling I-SEARCH-PARSER >> The variable S is used free; assumed special. The variable R is used free; assumed special. The variable Q is used free; assumed special. The variable G is used free; assumed special. << While compiling SEARCH-FORWARD >> (STRING-EQUAL CHARS STRING (1+& POS) ...) may perhaps be an obsolete call to STRING-EQUAL If (1+& POS) and (+& STRING-LEN POS) are keywords when STRING-EQUAL is called, then sorry for bothering you, as that agrees with the STRING-EQUAL's new arglist: (STRING1 STRING2 &KEY START1 END1 START2 END2) If not, you should be using (STRING-EQUAL CHARS STRING :START1 (1+& POS) :START2 1 :END1 (+& STRING-LEN POS) :END2 STRING-LEN) instead The variable LENGTH is bound but never used. << While compiling MULTI-LINE-SEARCH-FORWARD >> (STRING-EQUAL (LINE-CHARS LINE) S1 (-& (LINE-CHAR-COUNT LINE) S1LEN) ...) may perhaps be an obsolete call to STRING-EQUAL If (-& (LINE-CHAR-COUNT LINE) S1LEN) and (LINE-CHAR-COUNT LINE) are keywords when STRING-EQUAL is called, then sorry for bothering you, as that agrees with the STRING-EQUAL's new arglist: (STRING1 STRING2 &KEY START1 END1 START2 END2) If not, you should be using (STRING-EQUAL (LINE-CHARS LINE) S1 :START1 (-& (LINE-CHAR-COUNT LINE) S1LEN) :START2 0 :END1 (LINE-CHAR-COUNT LINE) :END2 S1LEN) instead (STRING-EQUAL (LINE-CHARS L) S 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL (LINE-CHARS L) S :START1 0 :START2 0 :END1 LLEN :END2 SLEN) instead. (STRING-EQUAL (LINE-CHARS L) S 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL (LINE-CHARS L) S :START1 0 :START2 0 :END1 SLEN :END2 SLEN) instead. << While compiling MULTI-LINE-SEARCH-BACK >> (STRING-EQUAL (LINE-CHARS LINE) S1 (-& (LINE-CHAR-COUNT LINE) S1LEN) ...) may perhaps be an obsolete call to STRING-EQUAL If (-& (LINE-CHAR-COUNT LINE) S1LEN) and (LINE-CHAR-COUNT LINE) are keywords when STRING-EQUAL is called, then sorry for bothering you, as that agrees with the STRING-EQUAL's new arglist: (STRING1 STRING2 &KEY START1 END1 START2 END2) If not, you should be using (STRING-EQUAL (LINE-CHARS LINE) S1 :START1 (-& (LINE-CHAR-COUNT LINE) S1LEN) :START2 0 :END1 (LINE-CHAR-COUNT LINE) :END2 S1LEN) instead (STRING-EQUAL (LINE-CHARS L) S 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL (LINE-CHARS L) S :START1 0 :START2 0 :END1 LLEN :END2 SLEN) instead. (STRING-EQUAL (LINE-CHARS L) S 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL (LINE-CHARS L) S :START1 0 :START2 0 :END1 SLEN :END2 SLEN) instead. Loading DJ: GJCX.STEVE; SEARCH.QFASL#> Compiling DJ: GJCX.STEVE; XSEARCH.LISP#> Loading DJ: GJCX.STEVE; XSEARCH.QFASL#> Compiling DJ: GJCX.STEVE; DEFSRCH.LISP#> << While compiling DEFUN-SEARCH-CONTINUE >> Function GLOBAL-DEFUN-SEARCH called with the unrecognized keyword :BUFFER The following functions were referenced but don't seem defined: STEVE-SI::TTYSCANNER referenced by DEFUN-SEARCH-ALL-BUFFERS WHEREIS referenced by FUNCTION-SEARCH STEVE-SI::VAS-SOURCE-FILE referenced by FIND-MODULE-SOURCE-FILE STEVE-SI::MODULE-LOADED-FILE referenced by FIND-MODULE-SOURCE-FILE Loading DJ: GJCX.STEVE; DEFSRCH.QFASL#> Variable *FUNCTION-SEARCH* being redefined by file DJ: GJCX.STEVE; DEFSRCH.#. It was previously defined by file DJ: GJCX.STEVE; VARS.#. Compiling DJ: GJCX.STEVE; HELP.LISP#> The following functions were referenced but don't seem defined: STEVE-SI::TTYSCANNER referenced by WITH-HELP-FILE-LOADED Loading DJ: GJCX.STEVE; HELP.QFASL#> Compiling DJ: GJCX.STEVE; DIRED.LISP#> << While compiling SETUP-DIRED-BUFFER >> The variable TIME::*MONTH-STRINGS* is used free; assumed special. << While compiling DIRED-DELETE-FILES-CAREFULLY >> Function DELETE-FILE called with no value supplied for some keyword argument. The following functions were referenced but don't seem defined: MAPDIRECTORY referenced by SETUP-DIRED-BUFFER TIME::MODE-LANGUAGE-FETCH referenced by SETUP-DIRED-BUFFER Loading DJ: GJCX.STEVE; DIRED.QFASL#>Error: Bad prefix character: (X D) >>TRAP 2426 (THROW-TRAP) There was no pending CATCH for the tag :EDITOR-LOSS. The value being thrown was T. While in the function ED-LOSE  %INTERNAL-BINDERY  %DEFINE-BINDING ED-LOSE: (P.C. = 66) (from file DJ: GJCX.STEVE; ED.#) Arg 0 (FORMAT-STRING): "Bad prefix character: ~a" Rest arg (ARGS): ((#/c-X #/D)) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Throw to another tag. You type an expression for it. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. c-R Return a value from the function ED-LOSE. c-N %INTERNAL-BINDERY: (P.C. = 32) (from file DJ: GJCX.STEVE; HASH.#) Arg 0 (KEY-SEQ): (#/c-X #/D) Arg 1 (BINDING): DIRED Arg 2 (TABLE): # c-R Return a value from the function %INTERNAL-BINDERY. ()() >>TRAP 6019 (SUBSCRIPT-OOB M-Q M-ARRAY-LENGTH (NIL RESTORE-ARRAY-REGISTERS) M-ARRAY-POINTER) The subscript 28804 for # was out of range in GLOBAL:AR-1. While in the function SYSTEM:FASL-OP-STOREIN-FUNCTION-CELL  SYSTEM-INTERNALS#:FASL-GROUP  SYSTEM-INTERNALS#:FASL-WHACK-SAVE-FASL-TABLE SYSTEM:FASL-OP-STOREIN-FUNCTION-CELL: (P.C. = 72) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Use different subscripts. You type expressions for them. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. c-N SYSTEM-INTERNALS#:FASL-GROUP: (P.C. = 103) c-N SYSTEM-INTERNALS#:FASL-WHACK-SAVE-FASL-TABLE: (P.C. = 30) c-N SYSTEM-INTERNALS#:FASL-WHACK: (P.C. = 21) c-N SYSTEM-INTERNALS#:FASL-TOP-LEVEL: (P.C. = 26) c-N SYSTEM-INTERNALS#:FASLOAD-INTERNAL: (P.C. = 313) Arg 0 (FASL-STREAM): #" 50045360> Arg 1 (PKG): NIL Arg 2 (NO-MSG-P): T c-N FASLOAD: (P.C. = 75) Arg 0 (FILE-NAME): #FILE-SYSTEM#:LM-PATHNAME "DJ: GJCX.STEVE; DIRED.QFASL#>" Arg 1 (PKG): NIL Arg 2 (NO-MSG-P): T c-P SYSTEM-INTERNALS#:FASLOAD-INTERNAL: (P.C. = 313) Arg 0 (FASL-STREAM): #" 50045360> Arg 1 (PKG): NIL Arg 2 (NO-MSG-P): T c-P SYSTEM-INTERNALS#:FASL-TOP-LEVEL: (P.C. = 26) c-P SYSTEM-INTERNALS#:FASL-WHACK: (P.C. = 21) c-P SYSTEM-INTERNALS#:FASL-WHACK-SAVE-FASL-TABLE: (P.C. = 30) c-P SYSTEM-INTERNALS#:FASL-GROUP: (P.C. = 103) c-P SYSTEM:FASL-OP-STOREIN-FUNCTION-CELL: (P.C. = 72) c-N SYSTEM-INTERNALS#:FASL-GROUP: (P.C. = 103) c-L >>TRAP 6019 (SUBSCRIPT-OOB M-Q M-ARRAY-LENGTH (NIL RESTORE-ARRAY-REGISTERS) M-ARRAY-POINTER) The subscript 28804 for # was out of range in GLOBAL:AR-1. SYSTEM-INTERNALS#:FASL-GROUP: (P.C. = 103) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Use different subscripts. You type expressions for them. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. c-N SYSTEM-INTERNALS#:FASL-WHACK-SAVE-FASL-TABLE: (P.C. = 30) c-N SYSTEM-INTERNALS#:FASL-WHACK: (P.C. = 21) c-L >>TRAP 6019 (SUBSCRIPT-OOB M-Q M-ARRAY-LENGTH (NIL RESTORE-ARRAY-REGISTERS) M-ARRAY-POINTER) The subscript 28804 for # was out of range in GLOBAL:AR-1. SYSTEM-INTERNALS#:FASL-WHACK: (P.C. = 21) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Use different subscripts. You type expressions for them. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. s-C Compiling DJ: GJCX.STEVE; SM.LISP#> << While compiling PARSE-SEND-MAIL-BUFFER >> Unknown STATUS function UNAME. The variable UNAME is used free; assumed special. << While compiling LINE-MATCH >> (STRING-EQUAL (LINE-CHARS LINE) STRING 0 ...) is an obsolete non-keyworded call to STRING-EQUAL You should be using (STRING-EQUAL (LINE-CHARS LINE) STRING :START1 0 :START2 0 :END1 LENGTH) instead. The following functions were referenced but don't seem defined: TIME::PRINT-CURRENT-MAIL-FORMAT-DATE referenced by PARSE-SEND-MAIL-BUFFER STATUS referenced by PARSE-SEND-MAIL-BUFFER STEVE-SI::TRNLOG referenced by SEND-MAIL Loading DJ: GJCX.STEVE; DIRED.QFASL#>Error: Bad prefix character: (X D) >>TRAP 2426 (THROW-TRAP) There was no pending CATCH for the tag :EDITOR-LOSS. The value being thrown was T. While in the function ED-LOSE  %INTERNAL-BINDERY  %DEFINE-BINDING ED-LOSE: (P.C. = 66) (from file DJ: GJCX.STEVE; ED.#) Arg 0 (FORMAT-STRING): "Bad prefix character: ~a" Rest arg (ARGS): ((#/c-X #/D)) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Throw to another tag. You type an expression for it. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. c-L >>TRAP 2426 (THROW-TRAP) There was no pending CATCH for the tag :EDITOR-LOSS. The value being thrown was T. ED-LOSE: (P.C. = 66) (from file DJ: GJCX.STEVE; ED.#) Arg 0 (FORMAT-STRING): "Bad prefix character: ~a" Rest arg (ARGS): ((#/c-X #/D)) ;Reading in base 10 in package STEVE with standard Zetalisp readtable. Commands available for this particular error: s-A, : Throw to another tag. You type an expression for it. s-B: Retry loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-C: Give up loading DJ: GJCX.STEVE; DIRED.QFASL#>. s-D, : Return to top level in Lisp Listener 1. s-E: Return to top level in Lisp Listener 1. s-F: Restart process Initial Process. s-G: Reset and arrest process Initial Process. c-N %INTERNAL-BINDERY: (P.C. = 32) (from file DJ: GJCX.STEVE; HASH.#) Arg 0 (KEY-SEQ): (#/c-X #/D) Arg 1 (BINDING): DIRED Arg 2 (TABLE): # c-N %DEFINE-BINDING: (P.C. = 31) (from file DJ: GJCX.STEVE; HASH.#) Arg 0 (KEY-SEQ): (#/c-X #/D) Arg 1 (BINDING): DIRED Arg 2 (M-X-NAME): DIRED Arg 3 (MODES): ("Fundamental") Arg 4 (DOCUMENTATION): "Directory editing subsystem" Arg 5 (ARGS): NIL c-N EVAL: (P.C. = 96) Arg 0 (FORM): (%DEFINE-BINDING (QUOTE #) (QUOTE DIRED) (QUOTE DIRED) ...) --Defaulted args:-- Arg 1 (NOHOOK): NIL c-R Return a value from the function EVAL. ()() Loading DJ: GJCX.STEVE; SM.QFASL#> Function SEND-MAIL being redefined by file DJ: GJCX.STEVE; SM.#. It was previously defined by file DJ: GJCX.STEVE; MXCOM.#. T