(FILECREATED "16-Dec-86 19:23:25" ("compiled on " {QV}1.3K>NEXT>RHTPATCH175.;4) "12-Nov-85 14:59:23" recompiled changes: NC.MakeCrossFileLinkIconStandIn NC.MakeBrowserCard NC.UpdateBrowserCard in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "16-Dec-86 19:23:09" {QV}1.3K>NEXT>RHTPATCH175.;4 26926 changes to: (FNS NC.MakeCrossFileLinkIconStandIn NC.MakeBrowserCard NC.UpdateBrowserCard) (VARS RHTPATCH175COMS) previous date: "16-Dec-86 14:58:45" {QV}1.3K>NEXT>RHTPATCH175.;1) NC.MakeCrossFileLinkIconStandIn D1 (I 0 RemoteCardTitle) o@o ` (21Q IMAGEOBJCREATE 13Q CONCAT) (16Q NC.ExternalPutLinkIconImageFns) ( 10Q "]]" 3 "[[CrossFileLink to: ") NC.MakeBrowserCard D1 (P 23Q NewLink P 22Q NodeID P 21Q Node P 17Q RootCard P 13Q DropVirtualNodesFlg P 12Q BrowserSpecs P 11Q SpecialBrowserSpecs P 10Q Graph P 7 Window P 6 RootNodes P 5 Lattice P 4 CardType P 3 Depth P 2 BrowserFormat P 1 ListOfLinkLabels P 0 RootCards I 3 ParamList I 2 NoDisplayFlg I 1 Title I 0 Card) 7Cg'd£d‘hCg'Cg'Cg'@ u @ B³@Aµo _gg ¿HµB´hhŽd`Ooi Xgð³O@IKJiC¢B´g _dµ@ ¿O hYO[OZ`J“i_¿`´O ˆdl hh_B¯Oil o ¿@ HhI@K ]@H°"d_¿@O _¿Oµ Oh_‚O&_¿µßO^B©Og@ ¿M!O µ6M´‚±žN´‚±—MNg`J OOOO ±Š_"¿¿O"O`O"@ O&µ;O" ¿O"_$ g ¿O$ g ¿O _ ±ÿb °×dddddddddddh_@OOO BªOho ¿@O @Iµ`h @H @J @K @O B‘@OgO OL OL O O(1062Q NC.RelayoutBrowserCard 1055Q NC.InstallTitleBarMiddleMenu 1047Q NC.InstallTitleBarLeftMenu 1041Q PUTWINDOWPROP 1023Q NC.SetSpecialBrowserSpecs 1015Q NC.SetBrowserDepth 1010Q NC.SetBrowserFormat 1003Q NC.SetBrowserRoots 776Q NC.SetBrowserLinkLabels 762Q NC.SetSubstance 753Q NC.PrintMsg 737Q NC.SetBrowserLinksLegend 734Q NC.MakeLinksLegend 666Q NC.MakeLinkIcon 652Q NC.GraphNodeIDRemProp 644Q NC.CoerceToGraphNodeID 636Q NC.GraphNodeIDRemProp 630Q NC.CoerceToGraphNodeID 615Q NC.MakeCrossFileLinkIconStandIn 612Q NCP.CardTitle 563Q NC.MakeLink 520Q BLOCK 506Q LAYOUTGRAPH 460Q SUBST 413Q PUTWINDOWPROP 344Q NC.GetBrowserNodeID 322Q NC.GrowLinkLattice 311Q NC.GetBrowserHashArray 304Q NC.PrintMsg 275Q CHARACTER 247Q NC.AskSpecialBrowserSpecs 204Q CLOSEW 176Q NC.DeactivateCard 165Q NC.AskBrowserSpecs 142Q NC.HoldTTYProcess 130Q NC.SelectNoteCards 76Q WINDOWADDPROP 63Q NC.MakeNewCardWindow 45Q NC.ActivateCard 36Q NC.RetrieveType) (1034Q GRAPH 771Q NC.SubBoxLinkLabel 647Q VisitedFlg 633Q TouchedFlg 542Q NC.BrowserContentsLinkLabel 454Q NC.*Graph*BrowserFormat 451Q LATTICE 407Q NoteCardObject 240Q NC.SpecialBrowserSpecsFlg 226Q NC.*Graph*BrowserFormat 161Q DONTASK 134Q CANCELLED 115Q NC.SelectingBrowserSourceMenu 73Q NC.GraphCardShrinkFn 70Q SHRINKFN 31Q DEPTH 24Q FORMAT 17Q LINKTYPES 3 ROOTCARDS) ( 750Q "Done!" 301Q "Computing browser graph. Please wait. ..." 123Q "Please shift-select the Cards and/or Boxes the browser should start from." 60Q "Untitled") NC.UpdateBrowserCardA0001 D1 (NAME ERRORSET P 61Q ToNode P 60Q ToNodeID P 53Q FromNode P 52Q FromNodeID P 45Q NewLink P 44Q NodeID P 43Q Node P 36Q OldLabelNode P 34Q OldNode P 33Q NodeID P 32Q Node P 30Q NodeLabel P 27Q NodeID P 26Q Node P 24Q RootCard P 20Q Win P 16Q OldRootCards P 15Q OldLabelNodes P 14Q SpecialBrowserSpecs P 13Q Depth P 12Q DropVirtualNodesFlg P 11Q BrowserFormat P 10Q BrowserSpecs P 7 NodeLabel P 6 GraphNodes P 5 Graph P 4 LinkIcon P 3 Lattice P 2 RootNodes P 1 RootCards P 0 LinkLabels F 62Q Card F 63Q Window F 64Q RESETVARSLST F 65Q RESETY) i2gWdgWdg hWdgg hWhch¿gWdgWdg hWdg hWhch¿ðWd ¹Wd ¸Wd µo_¿`O“i_¿Wd µo_¿Wd d¨dl hh_¿Wfg ]¾I²oooiWfi ²?WfWdNI_ ¿hd`Wfol o i ¹WfWdNO ¿Igð’±iWf Oµ+Wd ¿Wfil o ¿IhHWdO »@I°@_ g ›O ¿O ¿O_°¹d_(¿WdO( _"¿O$µ O"h_&‚O"&_$¿µÞO&ºWdi ¿N1O*µjK1O2µ‚±¦KO »OO:µ‚±K´‚±kJ´‚±dKdQ$O>µ‚±O@g`O OOOO ±G_,¿¿O,_.µO.K³-O,_0 šO0 id ‹O0—O,O_¿O*_*±ÿO_4¿¿O4_6N_8²O4O8°@O4Wf`O4Wd %OJµ2O4 ¿O6g ¿O6g ¿O2_2±þÑ °à_<¿¿O<O<Q+OLµ/ON¿O<O<Q1OXµlOZ¿O:_:±þ_T¿¿OTK_Vµ°= ²OVO<OV¿OT_R¿OPµORh_P_N¿OL_L±ÿ~OR&_P¿°ò_`¿¿O`K_bµ°? ²ObO<Ob¿O`_^¿O\µO^h_\_Z¿OX_X±ÿ?O^&_\¿°ò_F¿¿OF µOF_HdJ¯¿OF³OH_D¿OBµODh_B_@¿O>_>±ý±OD&_B¿°òdddddddddddh½WdMWfO ¿WdI ¿WdO ¿WfgM ¿Wfi ¿hcji(2140Q NC.RelayoutBrowserCard 2131Q PUTWINDOWPROP 2117Q NC.SetBrowserDepth 2107Q NC.SetBrowserRoots 2100Q NC.SetBrowserLinksLegend 2075Q NC.MakeLinksLegend 1737Q NC.CoerceToGraphNodeID 1731Q BLOCK 1623Q NC.LinkIconImageObjP 1572Q BLOCK 1466Q NC.LinkIconImageObjP 1435Q BLOCK 1313Q BLOCK 1302Q NC.MakeLinkIcon 1266Q NC.GraphNodeIDRemProp 1255Q NC.GraphNodeIDRemProp 1242Q NC.MakeCrossFileLinkIconStandIn 1237Q NCP.CardTitle 1210Q NC.MakeLink 1076Q BLOCK 1041Q NC.DeleteLink 1034Q NC.FetchLinkFromLinkIcon 1026Q NC.LinkIconImageObjP 765Q BLOCK 753Q LAYOUTGRAPH 725Q SUBST 633Q \NCONC2 574Q NC.SetPropListDirtyFlg 532Q NC.GetBrowserNodeID 506Q CLOSEW 500Q DETACHWINDOW 472Q GETWINDOWUSERPROP 452Q NC.GrowLinkLattice 436Q NC.PrintMsg 427Q CHARACTER 416Q NC.GetBrowserHashArray 400Q ATTACHEDWINDOWS 361Q NC.BrowserFlipRoots 346Q NC.SelectNoteCards 341Q CONCAT 332Q CHARACTER 311Q NC.BrowserFlipRoots 274Q NC.AskYesOrNo 242Q GETWINDOWUSERPROP 214Q NC.FetchSpecialBrowserSpecs 176Q NC.FetchBrowserDepth 145Q NC.FetchBrowserFormat 137Q NC.FetchBrowserLinkLabels 131Q NC.FetchBrowserRoots 110Q NC.SetUserDataProp 105Q THIS.PROCESS 70Q NC.FetchUserDataProp 37Q NC.SetUserDataProp 17Q NC.FetchUserDataProp) (2125Q GRAPH 1263Q VisitedFlg 1252Q TouchedFlg 1166Q NC.BrowserContentsLinkLabel 720Q NC.*Graph*BrowserFormat 715Q LATTICE 467Q LINKSLEGENDWINP 366Q CANCELLED 317Q NC.SelectingBrowserSourceMenu 237Q GRAPH 161Q NC.*Graph*BrowserFormat 102Q ProcessInProgress 65Q ProcessInProgress 60Q ProcessInProgress 53Q NC.SetUserDataProp 34Q Recompute% Browser% Card 31Q OperationInProgress 14Q OperationInProgress 7 OperationInProgress 2 NC.SetUserDataProp) ( 433Q "Computing browser graph. Please wait. ..." 336Q "(Current roots are highlighted.)" 325Q "Please shift-select the Cards and/or Boxes the browser should start from." 264Q "No" 260Q "--" 254Q "Want to respecify roots? " 204Q 3641077Q 153Q (LATTICE)) NC.UpdateBrowserCard D1 (P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 1 OperationInProgress P 0 Card I 1 DontCheckOpInProgressFlg I 0 Window F 5 LISPXHIST F 6 RESETVARSLST) ;@ A¯H Y™@gI hU!Vog ‘h‚g\ L“K(66Q ERROR! 61Q RESETRESTORE 47Q NC.UpdateBrowserCardA0001 26Q NC.PrintOperationInProgressMsg 14Q NC.OperationInProgress 3 NC.CoerceToCard) (55Q ERROR 44Q INTERNAL 22Q Recompute% Browser% Card) ( 41Q (NC.UpdateBrowserCardA0001)) NC.MakeLinkA0001 D1 (I 0 Card F 0 SourceCard F 1 Window) #@P ¡iQiol ol h(37Q NC.PrintMsg 33Q CHARACTER 22Q CHARACTER 4 NC.SameCardP) NIL ( 26Q "Selection ignored." 15Q "A Card/Box cannot link to itself. ") NC.MakeLinkA0007A0013 D1 (NAME ERRORSET P 2 CrossFileLinksTwoWayFlg P 0 \NF F 5 SourceCard F 6 DestinationCard F 7 Link F 10Q RESETVARSLST F 11Q CrossFileLinksMode F 12Q LinkLabel F 13Q DisplayMode F 14Q LinkToInsertAfter F 15Q Window F 16Q AnchorMode F 17Q RESETY)  gUÉHd`ð®´UH Y¿IÉ*ÉUohhWc¿UÉHd`ð®´UH Y¿IVÉHd`ð®´VH Y¿I ³4Wgðµ Whð´`J²WWVdUi W ¿UVJ c `KdL¿dU¿dV¿dW¿dW¿WµU KdL ¿cW ¿W ¿Wci(376Q NC.AddFromLink 370Q NC.AddToLink 347Q NC.FetchLinkDisplayMode 277Q NC.MakeUID 265Q NC.CreateCrossFileLinkCard 256Q NC.MakeGlobalLink 250Q NC.CreateCrossFileLinkCard 204Q NC.SameNoteFileP 173Q NC.NoteFileFromNoteFileUID 132Q NC.NoteFileFromNoteFileUID 35Q NC.NoteFileFromNoteFileUID) (273Q LinkTYPE# 227Q NC.NewCrossFileLinksTwoWayFlg 213Q TWOWAY 167Q CardObject 157Q NoteFileTYPE# 144Q CardObject 126Q CardObject 116Q NoteFileTYPE# 103Q CardObject 53Q NoteFileDevice 46Q NoteFile 31Q CardObject 21Q NoteFileTYPE# 6 CardObject 2 APPLY*) ( 62Q (TOLINKS)) NC.MakeLinkA0007 D1 (NAME ERRORSET P 4 RESETZ P 3 RESETY P 2 LISPXHIST P 0 \NF F 5 SourceCard F 6 DestinationCard F 7 RESETVARSLST F 10Q RESETY F 11Q LISPXHIST) ­gVÉHd`ð®´VH Y¿IÉ*ÉVohhWc¿UÉHd`ð®´UH Y¿IÉ*ÉUglIªUg ¿h°&W!Wog ‘h‚g\ ¿L“€Kci(244Q ERROR! 236Q RESETRESTORE 224Q NC.MakeLinkA0007A0013 177Q NC.CardPartBusy 132Q NC.NoteFileFromNoteFileUID 35Q NC.NoteFileFromNoteFileUID) (232Q ERROR 221Q INTERNAL 174Q TOLINKS 161Q TOLINKS 150Q NoteFileDevice 143Q NoteFile 126Q CardObject 116Q NoteFileTYPE# 103Q CardObject 53Q NoteFileDevice 46Q NoteFile 31Q CardObject 21Q NoteFileTYPE# 6 CardObject 2 APPLY*) ( 216Q (NC.MakeLinkA0007A0013) 62Q (FROMLINKS)) NC.MakeLink D1 (P 10Q RESETZ P 7 RESETY P 6 LISPXHIST P 5 \NF P 1 Type P 0 Link I 11Q CrossFileLinksMode I 10Q LinkToInsertAfter I 7 NoDisplayFlg I 6 Message I 5 AnchorMode I 4 DisplayMode I 3 SourceCard I 2 DestinationCard I 1 LinkLabel I 0 Window F 11Q LISPXHIST F 12Q RESETVARSLST)   Cµ@ b@o ´‚±óP@¦C b¿F¦ob ¿A©@hdi b¿Bµig`CF bgð²:@ Yd²,CÉMd`ð®´CM Z¿JhG b€B²B ŸB bd²pg ¿Bd²eÉMd`ð®´BM [¿KÉ*ɼBglL¨Bg hW!Wog ‘h‚g_ O“O(403Q ERROR! 375Q RESETRESTORE 362Q NC.MakeLinkA0007 337Q NC.CardPartBusy 275Q NC.NoteFileFromNoteFileUID 236Q NC.SetUserDataProp 223Q NC.GetCrossFileLinkDestCard 216Q NC.CrossFileLinkCardP 204Q NC.CoerceToCard 201Q NC.MakeNoteCard 165Q NC.NoteFileFromNoteFileUID 126Q NC.AskNoteCardType 123Q WINDOWREGION 107Q NC.SelectNoteCards 64Q NC.AskLinkLabel 37Q NC.FetchWindow 20Q NC.CheckForNotReadOnly 6 NC.CoerceToCard) (370Q ERROR 357Q INTERNAL 334Q FROMLINKS 322Q FROMLINKS 313Q NoteFileDevice 306Q NoteFile 271Q CardObject 261Q NoteFileTYPE# 246Q CardObject 233Q JustCreatedFlg 161Q CardObject 151Q NoteFileTYPE# 136Q CardObject 114Q *New% Card* 101Q NC.SelectingSingleCardMenu 76Q NC.MakeLinkA0001) ( 354Q (NC.MakeLinkA0007) 50Q "Please shift-select the Card or Box to be linked to." 15Q "Can't make links in ") (PRETTYCOMPRINT RHTPATCH175COMS) (RPAQQ RHTPATCH175COMS ((* * Fixes bug reported by Randy G whereby answering "no" to request to open Crossfilelink's notefile during browser creation causes break.) (* * New function for NCCROSSFILELINKS ) (FNS NC.MakeCrossFileLinkIconStandIn) (* * Change to NCBROWSERCARD) (FNS NC.MakeBrowserCard NC.UpdateBrowserCard) (* * Change to NCLINKS) (FNS NC.MakeLink))) (PUTPROPS RHTPATCH175 COPYRIGHT ("Xerox Corporation" 1986)) NIL