[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

can't call rubout-handler from zwei

In Symbolics 3600 Zwei in System 242.356, Hardcopy 20.10, FEP 18, on Lisp Machine Jimi Hendrix:

>>Trap: The function MACRO-STREAM-IO-TYI was called with too many arguments.
While in the function MACRO-STREAM-IO-TYI  MACRO-STREAM-IO  SYS:CALL-FUNNY-FUNCTION

MACRO-STREAM-IO-TYI:  (from B:>Gumby>Tapes>Zwei)
   Arg 0 (OP): :ANY-TYI
   Extraneous Rest Arg: (NIL)

MACRO-STREAM-IO:  (P.C. = 32)
   Arg 0 (OPERATION): :ANY-TYI
   Rest arg (SELECT-METHOD-ARGS): (NIL)

SYS:CALL-FUNNY-FUNCTION:  (P.C. = 101)
   Arg 0 (FUNCTION): #<DTP-CLOSURE 34305726>
   Rest arg (ARGS): (:ANY-TYI NIL)

Closure of MACRO-STREAM-IO:
   Arg 0: :ANY-TYI
   Arg 1: NIL

SI:READ-DELIMITED-STRING-INTERNAL:  (P.C. = 47)
   Arg 0 (DELIMITERS): (141.)
   Arg 1 (STREAM): #<DTP-CLOSURE 34305726>
   Arg 2 (EOF): NIL
   Arg 3 (BUFFER): ""
   --Defaulted args:--
   Arg 4 (BEGIN): NIL
   Arg 5 (END): NIL

READ-DELIMITED-STRING:  (P.C. = 113)
   Arg 0 (DELIMITERS): 141.
   Arg 1 (STREAM): #<DTP-CLOSURE 34305726>
   Arg 2 (EOF): NIL
   Arg 3 (INPUT-EDITOR-OPTIONS): NIL
   Rest arg (MAKE-ARRAY-ARGS): NIL

READLINE:  (P.C. = 15)
   Rest arg (READ-ARGS): NIL

(:INTERNAL TAPES:READ-TAPE-TYPE 0.):  (P.C. = 5)
   Arg 0 (.LINE-FLAG.): T
   Arg 1 (QUERY-IO-initialization): #<EDITOR-TYPEOUT-WINDOW Editor Typeout Window 5 3722260 exposed>

Rest of stack:
(:DEFUN-METHOD TV:RUBOUT-HANDLER-READ):  (P.C. = 61)
(:METHOD TV:STREAM-MIXIN :RUBOUT-HANDLER):  (P.C. = 72)
TAPES:READ-TAPE-TYPE:  (P.C. = 43)  (from B:>Gumby>Tapes>Tapes)
TAPES:PUT-VAR:  (P.C. = 15)  (from B:>Gumby>Tapes>Editor)
TAPES:MAKE-TAPE:  (P.C. = 14)  (from B:>Gumby>Tapes>Editor)
COM-MAKE-TAPE:  (P.C. = 16)  (from B:>Gumby>Tapes>Zwei)
COMMAND-EXECUTE:  (P.C. = 55)
PROCESS-COMMAND-CHAR:  (P.C. = 14)
(:METHOD EDITOR :EDIT):  (P.C. = 214)
(:METHOD TOP-LEVEL-EDITOR :COMBINED :EDIT):  (P.C. = 41)
ZMACS-WINDOW-TOP-LEVEL:  (P.C. = 16)
SI:PROCESS-TOP-LEVEL:  (P.C. = 53)