(FILECREATED "13-Mar-87 19:16:47" ("compiled on " {QV}1.3K>NEXT>RHTPATCH215.;6) "12-Nov-85 14:59:23" recompiled changes: NC.SeverAllLinks NC.SeverExternalLinks NC.DeleteNoteCards NC.DeleteNoteCardInternal NC.DeleteFromLink NC.DeleteToLink NC.DeleteLink NC.GetLinks NC.GetPropList NC.GetMainCardData NC.GetTitle NC.CompactNoteFileToTarget NC.CompactNoteFileInPlace in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "13-Mar-87 19:16:22" {QV}1.3K>NEXT>RHTPATCH215.;6 50217 changes to: (FNS NC.CompactNoteFileToTarget NC.CompactNoteFileInPlace NC.DeleteNoteCards NC.SeverAllLinks NC.SeverExternalLinks NC.DeleteFromLink NC.DeleteToLink NC.DeleteLink NC.GetPropList NC.GetMainCardData NC.GetTitle NC.GetLinks NC.DeleteNoteCardInternal) (VARS RHTPATCH215COMS) previous date: "13-Mar-87 11:47:25" {QV}1.3K>NEXT>RHTPATCH215.;1) NC.SeverAllLinks D1 (P 10Q Link P 3 Card I 2 InterestedWindow I 1 QuietFlg I 0 ListOfCards) ABio@ o 0@ dK AL#MXIHZYJ0@U YH_g O_N Oh^L\O&dK AL&MXIHZYJ AB  YH_g O_N Oh^L\O&(300Q NC.UIDGetProp 250Q LAST 244Q NC.SmartDeleteLinks 237Q NC.UnionListsOfLinks 202Q NC.RetrieveFromLinks 137Q NC.UIDGetProp 107Q LAST 44Q NC.RetrieveToLinks 24Q NC.PrintMsg 14Q LENGTH) (275Q AboutToBeDeletedFlg 270Q CardObject 263Q Link 134Q AboutToBeDeletedFlg 127Q CardObject 122Q Link) ( 20Q " cards." 10Q "Gathering links of ") NC.SeverExternalLinksA0001 D1 (P 4 Link1SourceIsExtFlg P 3 ExtCard2 P 2 ExtCard1 P 1 DestCard2 P 0 DestCard1 I 1 Link2 I 0 Link1) UP@Xg i@HZAYg AI[JK LJK(101Q NC.SameCardP 62Q NC.UIDGetProp 24Q NC.UIDGetProp) (116Q CardObject 110Q CardObject 67Q Link 57Q AboutToBeDeletedFlg 52Q CardObject 44Q Link 33Q Link 21Q AboutToBeDeletedFlg 14Q CardObject 6 Link) () NC.SeverExternalLinks D1 (P 22Q ExtCardIsSourceFlg P 21Q ExtCard P 20Q WasNotActiveFlg P 17Q PreviousExtCard P 16Q Link P 15Q i P 13Q Link P 6 Card P 1 NumLinksToSever P 0 LinksToSever I 2 InterestedWindow I 1 QuietFlg I 0 ListOfCards) 0ABio@ o 0@"dN A O$O[LK]\M0@` \K_g O_OOh__O_O&_dN A O|O[LjK]\M XABioH Yo Hg ABioIo Hk2OaO O Oi Ohihddi h \K_g O_OOh__O_WO&__O A.Ol ZjJJ BioOoIo  Og i_$OO_"O 3O Oi Ohihddi O" h_ O$O" O" O$O O OmO"_O_Ok_(772Q NC.DeleteFromLink 764Q NC.DeleteToLink 753Q NC.GetLinks 745Q NC.GetNoteCard 730Q NC.ActiveCardP 722Q NC.QuitCard 705Q NC.CardSaveFn 671Q NC.SameCardP 636Q NC.UIDGetProp 610Q NC.PrintMsg 561Q \FZEROP 544Q REMAINDER 526Q NC.ValidLinkP 520Q BLOCK 445Q NC.UIDGetProp 415Q LAST 410Q NC.QuitCard 373Q NC.CardSaveFn 363Q NC.ValidCardP 337Q NC.PrintMsg 316Q SORT 306Q NC.PrintMsg 275Q LENGTH 257Q NC.UnionListsOfLinks 220Q NC.RetrieveFromLinks 144Q NC.UIDGetProp 114Q LAST 47Q NC.RetrieveToLinks 27Q NC.PrintMsg 17Q LENGTH) (1000Q Link 660Q Link 650Q Link 633Q AboutToBeDeletedFlg 626Q CardObject 621Q Link 442Q AboutToBeDeletedFlg 435Q CardObject 430Q Link 313Q NC.SeverExternalLinksA0001 141Q AboutToBeDeletedFlg 134Q CardObject 127Q Link) ( 604Q " ..." 577Q " out of " 571Q "Severing links: " 333Q " ..." 326Q "Severing links: 1 out of " 302Q " links prior to severing." 271Q "Sorting " 23Q " cards." 13Q "Gathering external links of ") NC.DeleteNoteCardsA0001A0003 D1 (NAME ERRORSET P 4 \NF P 0 OpInProgress F 5 Card F 6 RESETVARSLST F 7 NC.LockLock F 10Q NC.CardBusyList F 11Q InterestedWindow F 12Q RESETY) $W U 1HgUgUg hUg hVc gUgUg hUgo hVc gULd`UL YIhULd`UL ZJgULd`UL [Kg  hVc oWchVc W HHgUiWi WU oH gci(431Q NC.PrintOperationInProgressMsg 421Q NC.FetchWindow 407Q NC.DeleteNoteCardInternal 366Q RELEASE.MONITORLOCK 344Q THIS.PROCESS 325Q NC.NoteFileProp 321Q NC.NoteFileProp 305Q NC.NoteFileFromNoteFileUID 252Q THIS.PROCESS 236Q NC.NoteFileFromNoteFileUID 172Q NC.NoteFileFromNoteFileUID 124Q NC.SetUserDataProp 104Q NC.FetchUserDataProp 56Q NC.SetUserDataProp 53Q THIS.PROCESS 37Q NC.FetchUserDataProp 11Q NC.CardCheckOpInProgress 4 OBTAIN.MONITORLOCK) (435Q DON'T 375Q US 316Q CardProcessInProgressList 301Q CardObject 271Q NoteFileTYPE# 256Q CardObject 247Q CardProcessInProgressList 232Q CardObject 222Q NoteFileTYPE# 207Q CardObject 166Q CardObject 156Q NoteFileTYPE# 143Q CardObject 137Q NC.ResetCardProcessInProgress 115Q OperationInProgress 101Q OperationInProgress 75Q OperationInProgress 71Q NC.SetUserDataProp 50Q ProcessInProgress 34Q ProcessInProgress 30Q ProcessInProgress 24Q NC.SetUserDataProp) ( 425Q "Delete Card" 341Q (SETQ NC.CardBusyList (DREMOVE (THIS.PROCESS) NC.CardBusyList)) 121Q "Delete Card") NC.DeleteNoteCardsA0001 D1 (NAME ERRORSET P 20Q RESETZ P 17Q RESETY P 16Q LISPXHIST P 15Q Card P 14Q i P 12Q NumToDelete P 11Q NumSpecified P 10Q CardsToDelete P 7 Card P 6 CardIdentifier P 0 OpInProgress F 21Q InterestedWindow F 22Q CardIdentifiers F 23Q RESETVARSLST F 24Q QuietFlg F 25Q NoGroupConfirmFlg F 26Q NC.LockLock F 27Q NoIndividualConfirmFlg F 30Q DontClearFlg F 31Q RESETY F 32Q LISPXHIST)  W, H3gd g W&c&gd go W&c&W, HHgW$hd`W"o c$W.W*W$ddh kic*c(W$ddhQJPKW$ddh  O _jHOOW*oOol o hoN _qO 'O iol n O i DOd o 6W.&oooW0hO W" hOLMh\[JZ/M&\oOoOOol oOo hoW0hW" VOdOgi OW(W" W(W"ioOo Ok OW(W"i W$_W(0Ol YjI I W"ioOoOo W4!W&og hg_ O O_Ok_~W"oH gc2i(1165Q NC.PrintOperationInProgressMsg 1131Q ERROR! 1122Q RESETRESTORE 1107Q NC.DeleteNoteCardsA0001A0003 1065Q NC.PrintMsg 1034Q \FZEROP 1017Q REMAINDER 1003Q BLOCK 765Q NC.ClearMsg 737Q NC.PrintMsg 711Q NC.SeverExternalLinks 673Q NC.UIDPutProp 641Q NC.ClearMsg 636Q NC.AskYesOrNo 617Q CONCAT 601Q CHARACTER 520Q NC.ClearMsg 513Q NC.AskYesOrNo 503Q NC.FetchWindow 450Q NC.CheckForNotReadOnly 441Q NC.FetchWindow 431Q NC.ClearMsg 425Q NC.FetchWindow 417Q DISMISS 410Q NC.PrintMsg 405Q CHARACTER 373Q NC.FetchWindow 364Q NC.TopLevelCardP 353Q NC.CoerceToCard 346Q BLOCK 331Q CONCAT 321Q CHARACTER 251Q LENGTH 241Q LENGTH 172Q LENGTH 143Q NC.SelectNoteCards 104Q RELEASE.MONITORLOCK 70Q SETTOPVAL 55Q GETTOPVAL 37Q SETTOPVAL 34Q THIS.PROCESS 25Q GETTOPVAL 10Q NC.SessionCheckOpInProgress 4 OBTAIN.MONITORLOCK) (1171Q DON'T 1115Q ERROR 1104Q INTERNAL 667Q AboutToBeDeletedFlg 662Q CardObject 131Q NC.SelectingCardsMenu 113Q US 61Q NC.SessionOperationInProgress 51Q NC.SessionOperationInProgress 31Q NC.SessionProcessInProgress 21Q NC.SessionProcessInProgress) ( 1161Q "Delete Note Cards" 1101Q (NC.DeleteNoteCardsA0001A0003) 1061Q " ..." 1053Q " out of " 1045Q "Deleting cards: " 733Q " ..." 725Q "Deleting cards: 1 out of " 624Q "Yes" 613Q " cards? " 605Q "Want to delete the remaining " 574Q " are not deletable." 563Q " cards specified, " 555Q "Out of " 472Q "Yes" 466Q " -- " 462Q "Are you sure you want to delete this?" 445Q "Can't delete cards from a " 400Q "You cannot delete this FileBox." 336Q "Yes" 325Q "Are you sure you want to delete them? " 314Q " cards to delete." 306Q "You've specified " 137Q "Please shift-select the Note Cards to be deleted." 65Q "Delete Note Cards") NC.DeleteNoteCards D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 5 NoGroupConfirmFlg I 4 QuietFlg I 3 InterestedWindow I 2 DontClearFlg I 1 NoIndividualConfirmFlg I 0 CardIdentifiers F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q NC.DeleteNoteCardsA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (NC.DeleteNoteCardsA0001)) NC.DeleteNoteCardInternalA0001A0002 D1 (NAME ERRORSET P 37Q FromLink P 35Q ToLink P 33Q CardPart P 32Q WLCardPart P 31Q WLCard P 30Q WriteLock P 26Q FromLink P 25Q ToLink P 11Q BusyPart P 10Q Window P 7 FromLinks P 6 ToLinks P 5 WriteLocks P 0 \NF F 40Q Card F 41Q InterestedWindow F 42Q RESETVARSLST F 43Q QuietFlg F 44Q IgnoreLinksFlg F 45Q RESETY) i W@Hd`W@H YI hi @odW@LJIh[I&KWBW@ cBW@i WHW@ W@ _N7dM0od_O*OJIh[I&K O7dM0od_O,OJIh[I&K WFWBio M1O.iMgW@oo_0_2 O0_4O2Hd`O2H _O*_O2O4lOJgO2Hd`O2H _O*O2O4hhhWDcDiO0_hhGO._.;dW@Hd`W@H _O*_ W@O6lO hhWDcDW@Hd`W@H _"O"*_$W@kO$W@ W@ WH3WFWBho NO8ZOO<qWFWBho W@ $W@ W@ _W@ W@ W@id W@Hd`Vf_: O: O:O: O8_8_> "O> O>W@ O>O> O<_