[no subject]

[Patrick Sobalvarro <PGS at MIT-OZ>]

In Remote-File 22.0, LMFILE-Remote 23.1, MIT-Specific 16.0, System 91.40,
ZMail 48.7, microcode 204, Rev Video, on Lisp Machine Twenty-five:

I did a DIRED, using C-U C-X D, giving an argument of <PGS.*>, meaning I wanted
to dired all of my subdirectories.  It told me that <PGS.
> had an invalid
character in it, and that's fine by me, but it ain't what I typed.

Insert your description of the circumstances here:


>>Keyboard break.
Backtrace from the debugger:

;;; I won't include all of READLINE here

PROMPT-AND-READ (P.C. = 113)

 Arg 0 (OPTION): (PATHNAME DEFAULTS #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*")
 Arg 1 (FORMAT-STRING): "~&Pathname to use instead: (default ~A) "
 Rest arg (FORMAT-ARGS): (#FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*")
Local 1 (OPTION-TYPE): PATHNAME
Local 2 (FUNCTION): #<DTP-FEF-POINTER (PROPERTY PATHNAME SI:PROMPT-AND-READ-FUNCTION) 1550260>


SI:FILE-RETRY-READ-PATHNAME (P.C. = 50)

 Arg 0 (PATHNAME): #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*"


ZWEI:DIRECTORY-EDIT-REVERT (P.C. = 402)

 Arg 0 (BUFFER): #<BUFFER "*Dired-1*" 6003401>
 Arg 1 (PATHNAME): #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*"
   --Defaulted args:--
 Arg 2 (IGNORE): NIL
 Arg 3 (SELECT-FLAG): NIL
Local 0 (DIRECTORY): NIL
Local 1 (.SAVED-TICK.): READ-ONLY
Local 2 (.FILE-ID.): (SPECIAL-BUFFER DIRED 105416)
Local 3 (.SPECIAL-P.): T
Local 4 (.OLD-TICK.): 105416
Local 5 (OLD-POSITION-PATHNAME): #FS:TOPS20-PATHNAME "OZ:PS:<PGS>ZWEI.LISP.3"
Local 6 (OLD-POSITION-INDEX): 0
Local 7 (SELECTED-P): T
Local 8 (OPEN-SUBDIRS): NIL
Local 9 (G1359): ((PATHNAME DEFAULTS #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*") "~&Pathname to use instead: (default ~A) " #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*")
Local 10 (G1360): ((#FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*") . PATHNAME)
Local 11 (ERROR-OBJECT): #FS:INVALID-PATHNAME-SYNTAX PROPERTY-LIST (PATHNAME #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*" OPERATION DIRECTORY-STREAM) CONDITION-NAMES (FS:INVALID-PATHNAME-SYNTAX FS:FILE-OPERATION-FAILURE FS:FILE-ERROR ERROR ...) FORMAT-STRING "~A" FORMAT-ARGS ("Invalid character in filename for OZ:PS:<PGS.
>*.*.*") PATHNAME #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*" OPERATION DIRECTORY-STREAM
Local 12 (*SELECTQ-ITEM*): (FS:INVALID-PATHNAME-SYNTAX FS:FILE-OPERATION-FAILURE FS:FILE-ERROR ERROR ...)
Local 13 (STREAM): NIL
Local 14 (BP): NIL


ZWEI:DIRECTORY-EDIT (P.C. = 104)

 Arg 0 (PATHNAME): #FS:TOPS20-PATHNAME "OZ:PS:<PGS.
>*.*.*"
   --Defaulted args:--
 Arg 1 (SELECT-P): T


ZWEI:COM-DIRED (P.C. = 52)

Local 0 (.WINS.): NIL
Local 1 (.BUFFER.): #<BUFFER "CALBRT.PALX PS:<PGS.PUMA> OZ:" 26364167>
Local 2 (OBUFFER): NIL


ZWEI:COM-R-DIRED (P.C. = 110)

Local 0 (PATHNAME): #FS:TOPS20-PATHNAME "OZ:PS:<PGS.PUMA>CALBRT.*.*"
Local 1 (.WINS.): NIL
Local 2 (.BUFFER.): #<BUFFER "CALBRT.PALX PS:<PGS.PUMA> OZ:" 26364167>
Local 3 (OBUFFER): NIL


ZWEI:COMMAND-EXECUTE (P.C. = 100)

 Arg 0 (COMMAND): ZWEI:COM-R-DIRED
 Arg 1 (CHAR): 144
 Arg 2 (PREFIX-CHAR): 530
   --Defaulted args:--
 Arg 3 (HOOK-LIST): NIL
Local 0 (G6771): NIL
Local 1 (HOOK): NIL


ZWEI:MAKE-EXTENDED-COMMAND-INTERNAL (P.C. = 103)

Local 0 (PREFIX-CHAR): 530
Local 1 (CHAR): 144


Additional information supplied with call:
 Expecting 3 values

ZWEI:COMMAND-EXECUTE (P.C. = 100)

 Arg 0 (COMMAND): #<DTP-CLOSURE 27353315>
 Arg 1 (CHAR): 530
 Arg 2 (PREFIX-CHAR): NIL
 Arg 3 (HOOK-LIST): (ZWEI:SHIFT-LOCK-HOOK)
Local 0 (G6771): NIL
Local 1 (HOOK): ZWEI:SHIFT-LOCK-HOOK


ZWEI:PROCESS-COMMAND-CHAR (P.C. = 67)

 Arg 0 (CH): 530
Local 0 (VALUE): NIL
Local 1 (LINE): NIL
Local 2 (INDEX): NIL
Local 3 (G7269): NIL
Local 4 (HOOK): NIL


(METHOD ZWEI:EDITOR EDIT) (P.C. = 462)

 Arg 0 (OPERATION): EDIT
   --Defaulted args:--
 Arg 1 (TOP-LEVEL-P): T
Local 0 (LEVEL): 1
Local 1 (G2471): ("Return to top level editor command loop.")
Local 2 (G2471): ((SYS:ABORT ERROR) ("Return to top level editor command loop.") T ("Return to top level editor command loop.") ...)
Local 3 (CH): 530


(METHOD ZWEI:TOP-LEVEL-EDITOR COMBINED EDIT) (P.C. = 111)

 Rest arg (.DAEMON-CALLER-ARGS.): (EDIT)
Local 1 (.DAEMON-MAPPING-TABLE.): #<ART-16B-5 17074744>


ZWEI:ZMACS-WINDOW-TOP-LEVEL (P.C. = 50)



SI:PROCESS-TOP-LEVEL (P.C. = 121)

 Arg 0 (IGNORE): NIL
Local 0 (G3581): ("Restart process ~A." "ZMACS-WINDOWS")
Local 1 (G3581): ((SYS:ABORT ERROR) ("Restart process ~A." "ZMACS-WINDOWS") T ("Restart process ~A." "ZMACS-WINDOWS") ...)
Local 2 (IGNORE): NIL