(FILECREATED "12-Feb-85 03:09:04" ("compiled on " {PHYLUM}RELEASE1.2>RHTPATCH001.;1) "20-Dec-84 12:07:22" tcompl'd in "INTERLISP-D 10-Jan-85 ..." dated "10-Jan-85 13:28:55") (FILECREATED "12-Feb-85 03:08:37" {PHYLUM}RELEASE1.2>RHTPATCH001.;1 10653 changes to: (VARS RHTPATCH001COMS) (FNS DEMO.ReshapeWins)) NC.MakeBrowserCard D1 (P 11Q Node P 10Q LabelPairs P 7 BrowserSpecs P 6 PropList P 5 Graph P 4 Window P 3 Lattice P 2 VerticalFlg P 1 ListOfLinkLabels P 0 RootID I 3 ListOfRootIDAndListOfLinkLabelsAndVerticalFlg I 2 NoDisplayFlg I 1 Title I 0 ID F 12Q NC.SubBoxLinkLabel F 13Q NC.BrowserCardDefaultHeight F 14Q NC.SpecialBrowserSpecsFlg F 15Q NC.BrowserCardDefaultWidth F 16Q NC.SelectingBrowserSourceMenu F 17Q NC.BrowserContentsLinkLabel)  CCCc@ B@g WWWho @ \HLiol ihWL Xd@ L hI!Lidhdi YLiol WWL ghhdl hh_JdoBLhl o HhhI@` [dL _BLg@ K-d OLWO@ KdhOOOOO ]BLho @M @ ^ddgIWh @gIWhh^ NgH NgO WNgOh @i B@MgMLgghi L@g Li L(670Q NC.ClearMsg 663Q NC.SetupTitleBarMenu 653Q SHOWGRAPH 620Q NC.SetPropListDirtyFlg 612Q LISTPUT 574Q LISTPUT 563Q LISTPUT 552Q NC.SetPropList 526Q LISTPUT 505Q NC.FetchPropList 501Q NC.SetSubstance 473Q NC.PrintMsg 457Q LAYOUTGRAPH 406Q NC.MakeLinkIcon 403Q NC.MakeLink 332Q PUTWINDOWPROP 316Q NC.MakeLinksLegend 307Q NC.GrowLinkLattice 271Q NC.PrintMsg 262Q CHARACTER 215Q NC.AskBrowserSpecs 202Q NC.PrintMsg 177Q CHARACTER 161Q NC.AskLinkLabel 142Q CLOSEW 135Q NC.DeactivateCard 126Q NC.SelectNoteCards 115Q NC.PrintMsg 112Q CHARACTER 72Q CREATEW 67Q NC.FetchTitle 63Q GETBOXREGION 47Q GETMOUSEY 44Q GETMOUSEX 33Q NC.SetRegion 30Q NC.MakeDummyRegion 17Q NC.ActivateCard) (660Q Browser 645Q NC.GraphCardMiddleButtonFn 642Q NC.GraphCardLeftButtonFn 634Q NC.GraphAddNodeFn 603Q BrowserSpecs 567Q BrowserLinksLegend 557Q BrowserRoot 534Q BrowserLinkLabels 514Q BrowserLinkLabels 326Q NoteCardID 303Q PSA.Database 221Q LATTICE 25Q Browser) ( 470Q "Done!" 266Q "Computing browser graph. Please wait. ..." 247Q (LATTICE VERTICAL) 172Q "Defaulting to SubBox pointers." 105Q "Please select the Note Card or File Box the browser should start from." 57Q "Please indicate where to place the new browser card.") NCP.CreateBrowserCard D1 (P 4 Label P 0 ValidLinkLabels I 6 VerticalFlg I 5 ParentFileBoxes I 4 Props I 3 NoDisplayFlg I 2 LinkLabels I 1 RootID I 0 Title) {0BdDdAh=dLdggL Lo hLhYJI[ZKXdd XBdh ZIg@CDEAHFh (170Q NCP.CreateCard 141Q LAST 127Q INTERSECTION 72Q NCP.ReportError 61Q NCP.ValidLinkLabel 53Q NCP.GetReverseLinkLabels 41Q NCP.GetLinkLabels) (151Q Browser 46Q _ALL 33Q ALL) ( 67Q " not a valid link label.") NC.BringUpTEditCard D1 (P 3 Title P 2 TEditProcess P 1 TEditWindow P 0 Region I 2 Region/Position I 1 TextStream I 0 ID F 5 PSA.TEditCardDefaultHeight F 6 PSA.TEditCardDefaultWidth F 7 TextStreamDirtyFlg) PA Y Bl AB3 .ZI l\jI LkٰJ IdddihBK@ XB BBHH ,B BBVU HuVUUho@ X@ [HK@ i Ydgg Ig@ Ig A cAIhg`ggh W@ IHHho(410Q GETMOUSEY 405Q GETMOUSEX 370Q NC.MarkCardDirty 361Q TEDIT 330Q TEDIT.STREAMCHANGEDP 324Q PUTWINDOWPROP 321Q NC.MakeTEditMiddleMenu 312Q PUTWINDOWPROP 307Q NC.MakeTEditLeftMenu 304Q NC.FetchType 274Q PUTWINDOWPROP 261Q CREATEW 255Q NC.DetermineBorderWidth 252Q NC.FetchType 243Q NC.FetchTitle 236Q GETBOXREGION 232Q CONCAT 217Q GETMOUSEY 214Q GETMOUSEX 202Q CREATEREGION 170Q POSITIONP 162Q CREATEREGION 140Q POSITIONP 131Q NC.FetchRegion 72Q TTY.PROCESS 60Q FLASHW 45Q TOTOPW 34Q \INSUREWINDOW 24Q EQLENGTH 6 TEXTOBJ) (351Q NC.TEditMenuFn 346Q TITLEMENUFN 343Q NC.DefaultFont 340Q FONT 316Q NoteCardsMiddleButtonMenu 300Q NoteCardsLeftButtonMenu 271Q NC.ShrinkFn 266Q SHRINKFN 11Q TEXTOBJ) ( 423Q "Please specify location for edit of Note Card " 226Q "Please specify location for edit of Note Card ") DEMO.ReshapeWins D1 (P 3 Win P 2 CurHeight P 1 CurWidth I 2 Increment I 1 StartVal I 0 WinList) F@AlAl#Hh[d \ L IJL IBlعJBlغHX(60Q SHAPEW 42Q COPYALL 34Q COPYALL 27Q WINDOWREGION) NIL () (PRETTYCOMPRINT RHTPATCH001COMS) (RPAQQ RHTPATCH001COMS ((FNS NC.MakeBrowserCard NCP.CreateBrowserCard NC.BringUpTEditCard) (FNS DEMO.ReshapeWins))) (PUTPROPS RHTPATCH001 COPYRIGHT ("Xerox Corporation" 1985)) NIL