(FILECREATED " 4-Feb-85 22:16:45" ("compiled on " {PHYLUM}RELEASE1.1>LIBRARY>NCKEYS.;7) "20-Dec-84 12:07:22" recompiled changes: NCKI.CommandDispatch NCKI.FindCard NCKI.ParsePath NCKI.QuitCard NCKI.RetrieveCard in "INTERLISP-D 10-Jan-85 ..." dated "10-Jan-85 13:28:55") (FILECREATED " 4-Feb-85 22:16:17" {PHYLUM}RELEASE1.1>LIBRARY>NCKEYS.;7 5421 changes to: ( VARS NCKEYSCOMS) (FNS NCKI.CommandDispatch NCKI.QuitCard NCKI.RetrieveCard NCKI.FindCard NCKI.ParsePath) (LISPXMACROS > < ?) previous date: " 4-Feb-85 12:12:29" {PHYLUM}RELEASE1.1>LIBRARY>NCKEYS.;1) NCKI.CommandDispatch D1 (I 1 CommandList I 0 Command) X@dgoA goA @dgoAi go(125Q NCP.CloseNoteFile 114Q NCP.CurrentNoteFile 102Q NCP.OpenNoteFile 66Q NCP.CurrentNoteFile 51Q NCKI.QuitCard 36Q NCP.CurrentNoteFile 25Q NCKI.RetrieveCard 12Q NCP.CurrentNoteFile) (106Q CLOSE 57Q OPEN 31Q QUIT 4 RETRIEVE) ( 121Q "Error: No open NoteFile" 73Q "Error: There is already an open NoteFile" 43Q "Error: No open NoteFile" 17Q "Error: No open NoteFile") NCKI.FindCard D1 (P 12Q Card P 10Q Link P 3 HitList P 2 Result P 1 PathHead P 0 RootLinks I 1 PathList I 0 RootCard) @hho A"HAL M[d]Hd;_ I IO O _N Oh^L\O&Oh_ A ZO_AKK Oh_A ZO_(221Q NCKI.FindCard 156Q NCKI.FindCard 152Q NCP.GetLinkDestination 103Q NCP.GetLinkDestination 74Q STRPOS 71Q NCP.CardTitle 66Q NCP.GetLinkDestination 57Q STREQUAL 53Q NCP.CardTitle 50Q NCP.GetLinkDestination 12Q NCP.GetLinks) NIL ( 7 (FiledCard SubBox)) NCKI.ParsePath D1 (P 0 UnpackedPath I 0 Path) W @ 0HIALM HJ KhZK&_gHO_N Oh^L\O&(35Q MKSTRING 32Q PACK 3 UNPACK) (66Q /) () NCKI.QuitCard D1 (P 5 Window P 0 Card I 0 CardTitle) S@;AI J 9] X@ H HK Lh[IYL&`dh hg(110Q NCP.DeactivateCards 51Q STRPOS 46Q NCP.CardTitle 42Q MKSTRING 33Q NCP.CardFromWindow 24Q NCP.DeactivateCards 10Q OPENWINDOWS) (120Q Done 115Q NCKI.LastCardRetrieved 101Q NCKI.LastCardRetrieved) () NCKI.RetrieveCard D1 (P 1 Card P 0 PathList I 0 PathName) (@ gH Ydd` Igg(30Q NCP.BringUpCard 15Q NCKI.FindCard 3 NCKI.ParsePath) (45Q NotFound 41Q Done 35Q NCKI.LastCardRetrieved 25Q NCKI.CardRegionOrPosition 11Q NC00001) () (PRETTYCOMPRINT NCKEYSCOMS) (RPAQQ NCKEYSCOMS ((GLOBALVARS NCKI.CardRegionOrPosition NCKI.LastCardRetrieved) (VARS ( NCKI.LastCardRetrieved NIL)) (INITVARS (NCKI.CardRegionOrPosition (create POSITION XCOORD _ 20 YCOORD _ 550))) (FNS NCKI.CommandDispatch NCKI.FindCard NCKI.ParsePath NCKI.QuitCard NCKI.RetrieveCard) ( LISPXMACROS > < ?) (FILES (FROM {PHYLUM}RELEASE1.1>) FGHPATCH))) (RPAQQ NCKI.LastCardRetrieved NIL) (RPAQ? NCKI.CardRegionOrPosition (create POSITION XCOORD _ 20 YCOORD _ 550)) (ADDTOVAR LISPXMACROS (> (NCKI.CommandDispatch (QUOTE RETRIEVE) LISPXLINE)) (< (NCKI.CommandDispatch ( QUOTE QUIT) LISPXLINE)) (? (NCKI.CommandDispatch (CAR LISPXLINE) (CDR LISPXLINE)))) (FILESLOAD (FROM {PHYLUM}RELEASE1.1>) FGHPATCH) (PUTPROPS NCKEYS COPYRIGHT ("Xerox Corporation" 1985)) NIL