(FILECREATED "21-Feb-87 11:23:01" ("compiled on " {QV}1.3K>NEXT>RHTPATCH202.;3) "12-Nov-85 14:59:23" recompiled changes: nothing in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "21-Feb-87 11:22:47" {QV}1.3K>NEXT>RHTPATCH202.;3 31131 changes to: (VARS RHTPATCH202COMS) previous date: "18-Feb-87 13:52:41" {QV}1.3K>NEXT>RHTPATCH202.;2) NC.ScavengeDatabaseFileA0001 D1 (P 6 Link P 0 Card I 1 Key I 0 Value F 7 NoteCardNumber F 10Q ReconstructLinks F 11Q ReconstructGlobalLinks F 12Q InterestedWindow F 13Q CardTotal F 14Q ListOfBoxesToReconstruct F 15Q ListOfCardsNeedingGlobalLinksReconstructed) @Wkcdl YjI)I #Wiol oWoWo Hg H Hg )Hg HgH HgH Hi H H H gjHgH AJ[KHg HgH H Hg HgH WH MPWH MfHi N gN`HN NLMh\[JZtM&\N Ng NWcM]N Ng NWcM]v(562Q NC.FetchUserDataProp 544Q NC.GlobalLinkP 537Q BLOCK 515Q NC.FetchUserDataProp 477Q NC.ChildLinkP 472Q BLOCK 436Q NC.DelReferencesToCard 414Q NC.FetchStatus 402Q BLOCK 374Q NC.DeactivateCard 357Q NC.FetchFromLinks 340Q NC.FetchFromLinks 330Q NC.SetUserDataProp 325Q NC.FetchGlobalLinks 314Q NC.FetchUserDataProp 305Q NC.SetUserDataProp 302Q \NCONC2 277Q NC.FetchGlobalLinks 272Q NC.SetUserDataProp 267Q NC.FetchGlobalLinks 255Q NC.FetchUserDataProp 234Q NC.CollectReferences 216Q NC.FetchStatus 212Q NC.ActivateCard 206Q NC.GetMainCardData 201Q NC.DeactivateCard 173Q NC.SetUserDataProp 170Q NC.FetchGlobalLinks 157Q NC.SetUserDataProp 154Q NC.FetchGlobalLinks 142Q NC.FetchUserDataProp 131Q NC.FetchUserDataProp 121Q NC.GetLinks 114Q NC.FetchUserDataProp 104Q NC.PrintMsg 60Q CHARACTER 42Q \FZEROP 25Q REMAINDER 11Q BLOCK 2 BLOCK) (557Q NeedsGlobalLinksReconstructedFlg 552Q Link 512Q NeedsReconstructingFlg 505Q Link 426Q LinkTYPE# 417Q ACTIVE 407Q Link 321Q ScavengerGlobalLinks 311Q NeedsGlobalLinksReconstructedFlg 263Q ScavengerGlobalLinks 252Q NeedsGlobalLinksReconstructedFlg 230Q ScavengerToLinks 221Q ACTIVE 164Q ScavengerGlobalLinks 150Q ScavengerToLinks 137Q NeedsGlobalLinksReconstructedFlg 126Q NeedsReconstructingFlg 111Q NeedsGlobalLinksReconstructedFlg) ( 100Q "." 72Q " out of " 64Q "Collecting Links for item " 53Q "Rebuilding notefile links.") NC.ScavengeDatabaseFileA0003 D1 (P 5 LinkLabel P 4 DestinationCard P 3 Link P 0 Card I 1 Key I 0 Value F 6 NoteCardNumber F 7 DiscoveredLinkLabels F 10Q InterestedWindow F 11Q CardTotal) @Vkc dld YjI(I "Wiol oVoWo H gHg 1JhK\gKLg  K]WMWcJZ(166Q NC.SetUserDataProp 162Q NC.FetchUserDataProp 137Q BLOCK 121Q NC.FetchUserDataProp 104Q NC.FetchStatus 77Q NC.PrintMsg 54Q CHARACTER 36Q \FZEROP 21Q REMAINDER 2 BLOCK) (173Q Link 157Q ScavengerFromLinks 152Q ScavengerFromLinks 144Q Link 116Q ScavengerToLinks 107Q ACTIVE) ( 73Q "." 65Q " out of " 60Q "Inverting links for item " 47Q "Repairing NoteFile.") NC.ScavengeDatabaseFileA0005 D1 (P 0 Card I 1 Key I 0 Value F 2 NoteCardNumber F 3 ToBeFiledCards F 4 InterestedWindow F 5 CardTotal) @Rkcdl YjI&I Tiol oRoUo H g7Hdg Hdg Hdg H HScHi Hi H (211Q NC.SetUserDataPropList 205Q NC.DeactivateCard 177Q NC.PutLinks 163Q NC.CardNeedsFilingP 156Q NC.SetFromLinks 153Q NC.FetchUserDataProp 142Q NC.SetToLinks 137Q NC.FetchUserDataProp 126Q NC.SetGlobalLinks 123Q NC.FetchUserDataProp 105Q NC.FetchStatus 100Q NC.PrintMsg 56Q CHARACTER 41Q \FZEROP 24Q REMAINDER 11Q BLOCK 2 BLOCK) (150Q ScavengerFromLinks 134Q ScavengerToLinks 120Q ScavengerGlobalLinks 110Q ACTIVE) ( 74Q "." 67Q " out of " 62Q "Rewriting links for item " 51Q "Repairing NoteFile.") NC.ScavengeDatabaseFile D1 (P 32Q ToLink P 30Q GlobalLink P 26Q Link P 21Q SourceCard P 20Q ThisCardsGlobalLinks P 17Q ThisCardsToLinks P 16Q Link P 14Q BoxToReconstruct P 12Q Box P 11Q Card P 10Q ToBeFiledCards P 7 ReconstructGlobalLinks P 6 ReconstructLinks P 5 DiscoveredLinkLabels P 4 OldLinkLabels P 3 NoteCardNumber P 2 CardTotal P 1 FileName P 0 NoteFile I 4 InterestedWindow I 3 ListOfCardsNeedingGlobalLinksReconstructed I 2 ListOfBoxesToReconstruct I 1 BadLinkLabelsFlg I 0 NoteFileOrFileName) @d`XYd .IhihdddidhD XDhoIol o hAHi Cd Ogi Bd Ogi H kZDiol okoJo j[Hg B OOAOTDiol okoJo j[Hg Diol okoJo j[Hg O"DioO o OH ML HML Hi H DioI o O9DhoO o (_gHoihO OgOg NAO$!O& O Oi O__,OO, O,O _*O(O*h_(_&O$_$O*&_(_O_"g _ O.>iO"gOO  O"g _O25iO"gOO O_N_0OO0 hO._._4OO4 hO2_2Di h(1257Q NC.ClearMsg 1237Q NC.SameLinkP 1227Q BLOCK 1205Q NC.SameLinkP 1175Q BLOCK 1155Q NC.SetUserDataProp 1123Q NC.FetchUserDataProp 1112Q NC.SetUserDataProp 1060Q NC.FetchUserDataProp 1040Q BLOCK 772Q NC.MakeChildLink 754Q NC.SameCardP 737Q BLOCK 717Q NC.DeactivateCard 710Q NC.PutMainCardData 702Q NC.SetUserDataProp 677Q \APPEND2 660Q NC.FetchUserDataProp 642Q NC.MakeNoteCard 621Q BLOCK 607Q NC.PrintMsg 577Q LENGTH 556Q NC.PrintMsg 546Q FULLNAME 534Q NC.ForceDatabaseClose 530Q NC.CheckpointDatabase 522Q NC.StoreLinkLabels 517Q UNION 510Q LDIFFERENCE 502Q NCP.FileCards 466Q NC.PrintMsg 456Q LENGTH 437Q MAPHASH 421Q NC.PrintMsg 377Q CHARACTER 364Q MAPHASH 346Q NC.PrintMsg 324Q CHARACTER 254Q MAPHASH 236Q NC.PrintMsg 214Q CHARACTER 163Q NC.SetUserDataProp 136Q NC.SetUserDataProp 115Q NC.RetrieveLinkLabels 104Q NC.PrintMsg 74Q CHARACTER 51Q NC.OpenDatabaseFile 30Q OPENP 5 SPAWN.MOUSE) (1145Q ScavengerToLinks 1120Q ScavengerToLinks 1102Q ScavengerGlobalLinks 1055Q ScavengerGlobalLinks 1046Q Link 763Q Link 747Q Link 655Q ScavengerToLinks 650Q ScavengerToLinks 625Q FileBox 475Q NoteFile 434Q NC.ScavengeDatabaseFileA0005 427Q NoteFile 361Q NC.ScavengeDatabaseFileA0003 354Q NoteFile 251Q NC.ScavengeDatabaseFileA0001 244Q NoteFile 174Q NoteFile 157Q NeedsReconstructingFlg 132Q NeedsGlobalLinksReconstructedFlg 21Q NoteFile 13Q NoteFileTYPE#) ( 632Q "Untitled: Reconstructed during repair" 603Q " cards in ToBeFiled box." 572Q "Filed " 552Q "." 542Q "Repair Completed for " 462Q " cards in ToBeFiled box ..." 451Q "Filing " 415Q "." 410Q " out of " 403Q "Rewriting links for item " 372Q "Repairing NoteFile." 342Q "." 335Q " out of " 330Q "Inverting links for item " 317Q "Repairing NoteFile." 232Q "." 225Q " out of " 220Q "Collecting Links for item " 207Q "Rebuilding notefile links." 100Q "Repair aborted." 67Q "." 62Q "Couldn't open ") NC.ScavengerPhase1A0001 D1 (P 0 Card I 1 Key I 0 Value F 1 ActivesTotal F 2 DeletedsTotal) %@H dgQkcgRkc(12Q NC.FetchStatus 2 BLOCK) (32Q DELETED 16Q ACTIVE) () NC.ScavengerPhase1 D1 (P 45Q DeletedsTotal P 44Q ActivesTotal P 43Q Reason P 41Q Box P 40Q News P 33Q Boxes P 32Q Type P 31Q Card P 30Q BadNews P 26Q BadCardEntry P 25Q LinkLabelsCard P 22Q NoteFileStream P 21Q CanDoPhase3Flg P 20Q NoteFileOpsMenuItem P 17Q NoteFileMenu P 16Q InspectorPendingEvent P 15Q FirstTimeFlg P 14Q ExtraBadNews P 13Q BadBoxes P 12Q BadNewsList P 11Q CardTotal P 10Q LinkLabelsNews P 7 MenuItems P 6 Menu P 5 CardsToDelete P 4 ReasonsHashArray P 3 ReasonsList P 2 UnknownCardTypesList P 1 NoteFile P 0 FileName I 4 InterestedWindow I 3 RecheckBadCardsFlg I 2 ScavengerInteractionWin I 1 ReadSubstancesFlg I 0 FileNameOrNoteFile) &P@d`_$@XohihdD X h @Y9hidhddidDhihddi YDhoHol o Di I k_B B `ohi bi_Bggi Bg BgD OIABD gO<O>h_<_:O8_8O>&_i"Bg oO_i_"oO_Ko O"Bhol Bgi BgO BgO BgO BgO `dOdgd`dg dgjdndh_&dO& Bgg I_@O@dgdgihO@ gO@o hO>_>(2232Q INTERSECTION 2210Q NC.FetchTypeFromScavengerInfo 2152Q BLOCK 2141Q ATTACHMENU 2035Q PUTWINDOWPROP 2024Q PUTWINDOWPROP 2013Q PUTWINDOWPROP 2002Q PUTWINDOWPROP 1770Q PUTWINDOWPROP 1757Q NC.PrintMsg 1754Q CHARACTER 1734Q INTERSECTION 1673Q GETWINDOWUSERPROP 1641Q NC.PrintMsg 1636Q CHARACTER 1613Q NC.PrintMsg 1607Q CHARACTER 1556Q NC.PrintMsg 1552Q CHARACTER 1533Q LENGTH 1521Q BLOCK 1475Q NC.PrintMsg 1472Q CHARACTER 1453Q NC.PrintMsg 1447Q CHARACTER 1422Q CHARACTER 1400Q MAPHASH 1356Q PUTWINDOWPROP 1345Q NC.PrintMsg 1341Q CHARACTER 1330Q CHARACTER 1264Q NC.FetchTitleFromScavengerInfo 1211Q LENGTH 1150Q NC.FetchTypeFromScavengerInfo 1137Q BLOCK 1107Q NC.FetchTypeFromScavengerInfo 1061Q PUTHASH 1043Q BLOCK 750Q BLOCK 723Q NC.SameCardP 712Q BLOCK 675Q DREMOVE 665Q PUTWINDOWPROP 654Q NC.PrintMsg 650Q CHARACTER 637Q CHARACTER 472Q HASHARRAY 427Q NC.RepositionWindowIfNeeded 420Q GETWINDOWUSERPROP 407Q CLOSEW 402Q NC.ScavengerCleanup 373Q PUTWINDOWPROP 366Q NC.BuildBadCardsList 350Q GETWINDOWUSERPROP 334Q NC.CheckUnknownCardTypes 325Q PUTWINDOWPROP 313Q PUTWINDOWPROP 275Q NC.GetScavengerInfo 262Q PUTWINDOWPROP 251Q GETWINDOWUSERPROP 241Q WINDOWADDPROP 217Q CREATEW 201Q CLEARW 174Q WINDOWP 155Q NC.ClearMsg 146Q NC.PrintMsg 136Q CHARACTER 113Q NC.OpenNoteFile 62Q OPENP 52Q NC.DatabaseFileName 10Q SPAWN.MOUSE) (2213Q FileBox 2171Q FREE 2163Q DELETED 2136Q TOP 2133Q RIGHT 2100Q DEFAULTMENUHELDFN 2071Q CLRPROMPT 2062Q NC.ScavengerAttachedMenuFont 2053Q NC.MessageWinAttachedMenuWhenSelectedFn 2040Q MENUTYPE# 2030Q BADBOXES 2017Q LINKSLABELSNEWS 2006Q EXTRABADNEWS 1775Q BADNEWSLIST 1764Q NEEDCHECKPOINT 1670Q NEEDLINKSCAVENGE 1564Q UNKNOWNCARDTYPE 1544Q ReasonString 1375Q NC.ScavengerPhase1A0001 1370Q NoteFile 1352Q NEEDLINKSCAVENGE 1161Q BADMAINDATA 1153Q FileBox 1100Q UNKNOWNCARDTYPE 767Q FREE 761Q DELETED 661Q NEEDLINKSCAVENGE 435Q NoteFile 415Q ORIGINALBADNEWSLIST 356Q ORIGINALBADNEWSLIST 345Q NEEDCHECKPOINT 320Q CARDTOTAL 307Q NOTEFILE 300Q SUCCESS 256Q INTERESTEDWINDOW 246Q INTERESTEDWINDOW 235Q NC.MessageWinCloseFn 232Q CLOSEFN 206Q NC.ScavengerInteractionWinRegion 162Q NoteFile 23Q NoteFile 16Q NoteFileTYPE#) ( 2227Q (BADMAINDATA UNKNOWNCARDTYPE) 1747Q "'Continue Repair' will integrate any card part versions beyond chkpt pointer." 1731Q (MAINDATAPASTCHKPT LINKSPASTCHKPT TITLEPASTCHKPT PROPLISTPASTCHKPT) 1716Q (Continue% Repair (QUOTE Continue% Repair) "Complete Inspect&Repair by rebuilding the links.") 1700Q (End% Inspect&Repair (QUOTE End% Inspect&Repair) "This exits Inspect&Repair normally, closing the notefile.") 1631Q "All non-deleted cards look okay." 1602Q "." 1575Q "The unknown types are: " 1537Q " have " 1465Q "Of the non-deleted ones," 1442Q " deleted cards." 1434Q " active cards and " 1426Q "there are " 1415Q " cards:" 1407Q "Out of " 1334Q "If you don't delete them or back up to a previous version, then phase 3 of Inspect&Repair will rebuild their contents." 1323Q " have bad substance(s)." 643Q "If you don't back them up to a previous version, then phase 3 of Inspect&Repair will rebuild them." 632Q "The link types are bad." 611Q (MAINDATAPASTCHKPT) 572Q "Fileboxes " 516Q ((Abort (QUOTE Abort) "Quit this Inspect&Repair operation.") (Recheck% Bad% Cards (QUOTE Recheck% Bad% Cards) "Recompute bad cards list. Useful if you've just loaded some card type definitions.") (Inspect% Cards (QUOTE Inspect% Cards) "Bring up the cards inspector menu." (SUBITEMS (Include% Deleted% Cards (QUOTE Include% Deleted% Cards) "Throw in deleted cards as well.")))) 212Q "Inspect&Repair Interaction Window" 142Q "Repair aborted." 131Q "." 124Q "Couldn't open " 41Q "What is the name of the NoteFile to Inspect&Repair? ") (PRETTYCOMPRINT RHTPATCH202COMS) (RPAQQ RHTPATCH202COMS ((* * Fix to bug whereby IDLE was suspending Inspect&Repair.) (FILES (FROM NOTECARDS) NCREPAIR) (* * Changes to NCREPAIR) (FNS NC.ScavengeDatabaseFile NC.ScavengerPhase1))) (FILESLOAD (FROM NOTECARDS) NCREPAIR) (PUTPROPS RHTPATCH202 COPYRIGHT ("Xerox Corporation" 1987)) NIL