(FILECREATED " 4-Feb-85 23:49:03" ("compiled on " {PHYLUM}RELEASE1.1>FGHPATCH2.;4) "20-Dec-84 12:07:22" recompiled changes: NC.DetermineDisplayRegion NC.DefaultCardWidth NC.DefaultCardHeight NC.AddCardType NC.AddSubstanceType in "INTERLISP-D 10-Jan-85 ..." dated "10-Jan-85 13:28:55") (FILECREATED " 4-Feb-85 23:48:24" {PHYLUM}RELEASE1.1>FGHPATCH2.;4 27128 changes to: (VARS FGHPATCH2COMS) (FNS NC.DetermineDisplayRegion NC.DefaultCardWidth NC.DefaultCardHeight NC.AddCardType NC.AddSubstanceType) previous date: " 4-Feb-85 23:22:53" {PHYLUM}RELEASE1.1>FGHPATCH2.;1) NC.DetermineDisplayRegion D1 (P 1 Region P 0 DefaultHeight I 1 Region/Position I 0 ID)  Al AdddihAA *@ YAAII AA@ @ @ Y!@ @ XHho@ IIho@ (231Q GETBOXREGION 225Q CONCAT 206Q GETMOUSEY 203Q GETMOUSEX 167Q GETBOXREGION 163Q CONCAT 150Q GETMOUSEY 145Q GETMOUSEX 141Q NC.DefaultCardHeight 135Q NC.DefaultCardWidth 126Q NC.FetchRegion 121Q CREATEREGION 116Q NC.DefaultCardHeight 112Q NC.DefaultCardWidth 101Q CREATEREGION 56Q NC.FetchRegion 50Q POSITIONP 10Q EQLENGTH) NIL ( 221Q "Please specify location for Note Card " 157Q "Please specify location for Note Card ") NC.DefaultCardWidth D1 (P 0 Type I 0 ID) @ H (12Q NC.DefaultWidthFromType 3 NC.FetchType) NIL () NC.DefaultCardHeight D1 (P 0 Type I 0 ID) @ H (12Q NC.DefaultHeightFromType 3 NC.FetchType) NIL () NC.DefaultHeightFromType D1 (P 5 CardType P 1 SaveCardType P 0 AtomCardType I 0 NoteCardType F 6 NC.CardTypes F 7 NC.SubstanceTypes) @d1VL8g o@o h@hWZChHM&MYMMh L\IKKJ(157Q NC.DefaultHeightFromType 44Q NC.ReportError 41Q CONCAT 25Q MKSTRING) (22Q NC.DefaultHeightFromType) ( 36Q "." 31Q "Unknown note card type: ") NC.DefaultWidthFromType D1 (P 5 CardType P 1 SaveCardType P 0 AtomCardType I 0 NoteCardType F 6 NC.CardTypes F 7 NC.SubstanceTypes) @d1VL7g o@o h@hWZAhHM%MYMMh L\IKKJ(155Q NC.DefaultWidthFromType 44Q NC.ReportError 41Q CONCAT 25Q MKSTRING) (22Q NC.DefaultWidthFromType) ( 36Q "." 31Q "Unknown note card type: ") 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 TextStreamDirtyFlg F 6 NC.DefaultFont) PA Y`@B X@ [HK@ i Ydgg Ig@ Ig A c AIhgVggh U@ I .ZI l\jI LkٰJ I(215Q TTY.PROCESS 203Q FLASHW 170Q TOTOPW 157Q \INSUREWINDOW 152Q NC.MarkCardDirty 144Q TEDIT 115Q TEDIT.STREAMCHANGEDP 111Q PUTWINDOWPROP 106Q NC.MakeTEditMiddleMenu 77Q PUTWINDOWPROP 74Q NC.MakeTEditLeftMenu 71Q NC.FetchType 61Q PUTWINDOWPROP 46Q CREATEW 42Q NC.DetermineBorderWidth 37Q NC.FetchType 30Q NC.FetchTitle 23Q NC.DetermineDisplayRegion 6 TEXTOBJ) (134Q NC.TEditMenuFn 131Q TITLEMENUFN 125Q FONT 103Q NoteCardsMiddleButtonMenu 65Q NoteCardsLeftButtonMenu 56Q NC.ShrinkFn 53Q SHRINKFN 11Q TEXTOBJ) () NC.BringUpSketchCard D1 (P 2 SketchViewer P 1 Title P 0 Region I 2 Region/Position I 1 Substance I 0 ID) O@@ Z"l[jJ KkٰJ J . JA@@ @B @ @ Zd@g J(113Q NC.SetupTitleBarMenu 102Q SKETCHW.CREATE 76Q NC.FetchScale 72Q NC.FetchTitle 66Q NC.DetermineDisplayRegion 61Q NC.FetchRegionViewed 47Q TTY.PROCESS 42Q \INSUREWINDOW 35Q TOTOPW 23Q FLASHW 6 NC.FetchWindow) (110Q Sketch) () NC.BringUpGraphCard D1 (P 3 IconWindow P 2 GraphWindow P 1 Title P 0 Region I 2 Region/Position I 1 Substance I 0 ID) RP@ Z$A@B @g gghi Zd@ Jg J J l\jJ Lkٰ(112Q FLASHW 76Q TOTOPW 71Q EXPANDW 64Q WINDOWP 61Q GETWINDOWUSERPROP 51Q NC.SetupTitleBarMenu 43Q SHOWGRAPH 27Q CREATEW 17Q NC.DetermineDisplayRegion 6 NC.FetchWindow) (56Q ICONFOR 35Q NC.GraphCardMiddleButtonFn 32Q NC.GraphCardLeftButtonFn 23Q NoteCardTitle) () NC.MakeBrowserCard D1 (P 10Q Node P 7 LabelPairs P 6 BrowserSpecs P 5 PropList P 4 Graph P 3 Window P 2 Lattice P 1 ListOfLinkLabels P 0 RootID I 3 ListOfRootIDAndListOfLinkLabels I 2 NoDisplayFlg I 1 Title I 0 ID F 11Q NC.SubBoxLinkLabel F 12Q NC.SpecialBrowserSpecsFlg F 13Q NC.SelectingBrowserSourceMenu F 14Q NC.BrowserContentsLinkLabel F 15Q PSA.Database)  CCb@ B@g @ @ [HKiol ihWK Xd@ K hI!Kidhdi YKiol WWK ghhdl hh^BKhl o HhhI@W ZdK _BKg@ J-dOKWO@ JdhNNNNN \BKho @L @ ]ddgIWh @gIWhh] MgH MgO WMgNh @i B@LgLKgghi K@g Ki K(620Q NC.ClearMsg 613Q NC.SetupTitleBarMenu 603Q SHOWGRAPH 550Q NC.SetPropListDirtyFlg 542Q LISTPUT 525Q LISTPUT 514Q LISTPUT 503Q NC.SetPropList 457Q LISTPUT 436Q NC.FetchPropList 432Q NC.SetSubstance 424Q NC.PrintMsg 410Q LAYOUTGRAPH 344Q NC.MakeLinkIcon 341Q NC.MakeLink 270Q PUTWINDOWPROP 254Q NC.MakeLinksLegend 245Q NC.GrowLinkLattice 230Q NC.PrintMsg 221Q CHARACTER 166Q NC.AskBrowserSpecs 153Q NC.PrintMsg 150Q CHARACTER 132Q NC.AskLinkLabel 113Q CLOSEW 106Q NC.DeactivateCard 77Q NC.SelectNoteCards 66Q NC.PrintMsg 63Q CHARACTER 43Q CREATEW 40Q NC.FetchTitle 34Q NC.DetermineDisplayRegion 27Q NC.SetRegion 24Q NC.MakeDummyRegion 13Q NC.ActivateCard) (610Q Browser 575Q NC.GraphCardMiddleButtonFn 572Q NC.GraphCardLeftButtonFn 564Q NC.GraphAddNodeFn 534Q BrowserSpecs 520Q BrowserLinksLegend 510Q BrowserRoot 465Q BrowserLinkLabels 445Q BrowserLinkLabels 264Q NoteCardID 172Q LATTICE 21Q Browser) ( 421Q "Done!" 225Q "Computing browser graph. Please wait. ..." 143Q "Defaulting to SubBox pointers." 56Q "Please select the Note Card or File Box the browser should start from.") NC.MakeGraphCard D1 (P 0 Window I 2 NoDisplayFlg I 1 Title I 0 ID) SB@ @@ Ao XhdddghdddddhHggid @Hg H@ H(117Q NC.SetupTitleBarMenu 112Q NC.SetSubstance 107Q GETWINDOWUSERPROP 77Q SHOWGRAPH 30Q CREATEW 16Q NC.DetermineDisplayRegion 5 NC.SetSubstance) (104Q GRAPH 71Q NC.GraphCardMiddleButtonFn 66Q NC.GraphCardLeftButtonFn 40Q NC.GraphAddNodeFn) ( 25Q "Untitled") NC.MakeContentsCard D1 (P 2 TextStream P 1 Window P 0 Spacer I 2 DontDisplay I 1 Title I 0 ID F 3 NC.MarkersInFileBoxesFlg F 4 NC.SubBoxMarkerLabel F 5 NC.FiledCardMarkerLabel F 6 NC.DefaultFont F 7 PSA.ContentsCardDefaultWidth F 10Q PSA.ContentsCardDefaultHeight) l l !o ZS$T Jk JHl U Jl JHlJHk @J @jdWW B@@ @Ao g Ydg@ Ig Igg JIhgVggh Ig @ J i.Ihdi n Ii I(331Q NC.ClearMsg 323Q DISMISS 314Q GETPROMPTWINDOW 277Q TEXTOBJ 273Q NC.ActivateCard 264Q BLOCK 260Q GETWINDOWUSERPROP 251Q TEDIT 224Q PUTWINDOWPROP 212Q PUTWINDOWPROP 207Q NC.MakeTEditMiddleMenu 200Q PUTWINDOWPROP 175Q NC.MakeTEditLeftMenu 172Q NC.FetchType 161Q CREATEW 156Q NC.DetermineBorderWidth 150Q NC.SetTitle 135Q NC.DetermineDisplayRegion 125Q NC.SetRegion 122Q CREATEREGION 110Q NC.SetSubstance 102Q TEDIT.INSERT 66Q TEDIT.INSERT.OBJECT 60Q NC.MakePlaceMarker 53Q TEDIT.INSERT 43Q TEDIT.INSERT.OBJECT 36Q NC.MakePlaceMarker 26Q OPENTEXTSTREAM 14Q CONCAT 11Q CHARACTER 4 CHARACTER) (302Q TEXTOBJ 255Q TEXTSTREAM 241Q NC.TEditMenuFn 236Q TITLEMENUFN 232Q FONT 221Q NC.ShrinkFn 216Q SHRINKFN 204Q NoteCardsMiddleButtonMenu 166Q NoteCardsLeftButtonMenu 153Q CONTENTS) ( 145Q "Untitled" 23Q "") NC.MakeSketchCard D1 (P 0 Window I 2 NoDisplayFlg I 1 Title I 0 ID) 4B@ @@h@ Ao Xd@g @dg @ H(60Q NC.MarkCardDirty 54Q NC.SetSubstance 43Q NC.SetupTitleBarMenu 32Q SKETCHW.CREATE 20Q NC.DetermineDisplayRegion 5 NC.SetSubstance) (50Q SKETCH 40Q Sketch) ( 27Q "Untitled") NC.MakeTEditCard D1 (P 1 Window P 0 TextStream I 2 NoDisplayFlg I 1 Title I 0 ID F 2 PSA.TimesRoman10 F 3 NC.DefaultFont) B1ohddgRggh X@H H i.@@ Ao Ydg@ Ig Igg hIhgSggh Ig @Ig Ig i.I(232Q GETWINDOWUSERPROP 223Q NC.SetSubstance 220Q GETWINDOWUSERPROP 205Q BLOCK 201Q GETWINDOWUSERPROP 172Q TEDIT 145Q PUTWINDOWPROP 133Q PUTWINDOWPROP 130Q NC.MakeTEditMiddleMenu 121Q PUTWINDOWPROP 116Q NC.MakeTEditLeftMenu 113Q NC.FetchType 102Q CREATEW 70Q NC.DetermineDisplayRegion 51Q TEXTOBJ 45Q NC.SetSubstance 37Q OPENTEXTSTREAM) (235Q TEXTOBJ 227Q TEXTOBJ 215Q TEXTSTREAM 176Q TEXTSTREAM 162Q NC.TEditMenuFn 157Q TITLEMENUFN 153Q FONT 142Q NC.ShrinkFn 137Q SHRINKFN 125Q NoteCardsMiddleButtonMenu 107Q NoteCardsLeftButtonMenu 54Q TEXTOBJ 26Q NC.TEditMenuFn 23Q TITLEMENUFN 17Q FONT) ( 77Q "Untitled" 11Q "") NC.AddCardType D1 (P 5 CardType P 0 NewType I 20Q DefaultHeight I 17Q DefaultWidth I 16Q LinkDisplayMode I 15Q UpdateLinkIconsInCardFn I 14Q DeleteLinksInCardFn I 13Q CollectLinksInCardFn I 12Q CardDirtyPFn I 11Q MarkCardDirtyFn I 10Q CopyCardFn I 7 PutCardFn I 6 GetCardFn I 5 QuitCardFn I 4 EditCardFn I 3 MakeCardFn I 2 SubstanceType I 1 SuperType I 0 TypeName F 6 NC.CardTypes F 7 NC.SubstanceTypes F 10Q NC.NoteCardTypeMenu) @@oo7VYiooA!AhIWhZXiooB VLLV@ABCDEFGGGGGGGGGG hXh c hcHBKhJ]d@V c L\(244Q REMOVE 204Q \NCONC2 106Q NC.ReportError 103Q CONCAT) NIL ( 77Q "Unknown substance type field: " 73Q "NC.AddCardType" 36Q "Unknown type in super type field: " 32Q "NC.AddCardType" 14Q "Illegal type name: NIL" 10Q "NC.AddCardType") NC.AddSubstanceType D1 (P 2 SubstanceType P 0 NewType I 15Q DefaultHeight I 14Q DefaultWidth I 13Q UpdateLinkIconsInSubstanceFn I 12Q DeleteLinksInSubstanceFn I 11Q CollectLinksInSubstanceFn I 10Q SubstanceDirtyPFn I 7 MarkSubstanceDirtyFn I 6 CopySubstanceFn I 5 PutSubstanceFn I 4 GetSubstanceFn I 3 QuitSubstanceFn I 2 EditSubstanceFn I 1 CreateSubstanceFn I 0 SubstanceName F 3 NC.SubstanceTypes) Y@oo SI.@ABCDEFGGGGGGGhXScHZd@S cIY(117Q REMOVE 17Q NC.ReportError) NIL ( 14Q "Illegal substance type name: NIL" 10Q "NC.AddSubstanceType") NC.MakeSubstanceTypesListA0001 D1 NIL hddddddddddhNIL NIL () NC.MakeSubstanceTypesListA0002 D1 NIL hhNIL NIL () NC.MakeSubstanceTypesListA0003 D1 (P 0 Value I 2 Region I 1 ID I 0 Stream) @ AH AH H(25Q NC.SetRegionViewed 15Q NC.SetScale 3 NC.GetSketchSubstance) NIL () NC.MakeSubstanceTypesList D1 (F 0 NC.SubstanceTypes) hcggggggggggggn,l ggggggggggggn,l ggggggggggggnn^ (212Q NC.AddSubstanceType 134Q NC.AddSubstanceType 57Q NC.AddSubstanceType) (200Q NC.UpdateLinkImagesInSketch 175Q NC.DelReferencesToCardFromSketch 172Q NC.CollectReferencesInSketch 167Q NC.SketchDirtyP 164Q NC.MarkSketchDirty 161Q NC.SketchCopySubstance 156Q NC.PutSketchSubstance 153Q NC.MakeSubstanceTypesListA0003 150Q NC.SketchCardCloseFn 145Q NC.BringUpSketchCard 142Q NC.MakeSubstanceTypesListA0002 137Q SKETCH 123Q NC.UpdateLinkImagesInGraph 120Q NC.DelReferencesToCardFromGraph 115Q NC.CollectReferencesInGraph 112Q NC.GraphDirtyP 107Q NC.MarkGraphDirty 104Q NC.GraphCopySubstance 101Q NC.PutGraphSubstance 76Q NC.GetGraphSubstance 73Q NC.GraphCardCloseFn 70Q NC.BringUpGraphCard 65Q NC.MakeSubstanceTypesListA0001 62Q GRAPH 46Q NC.UpdateLinkImagesInText 43Q NC.DelReferencesToCardFromText 40Q NC.CollectReferencesInText 35Q NC.TextDirtyP 32Q NC.MarkTextDirty 27Q NC.TextCopySubstance 24Q NC.PutTextSubstance 21Q NC.GetTextSubstance 16Q NC.TEditCloseFn 13Q NC.BringUpTEditCard 10Q OPENTEXTSTREAM 5 TEXT) () NC.MakeCardTypesList D1 (F 0 NC.CardTypes F 1 NC.NoteCardTypeMenu) +ghddddddddddddghdhhcgggghghdddddddg gggghghdddddddg gggghghdddddddg gggghdddddddddgnOl ggggghddddddddgnn^ gggghdddddddddg gggghdddddddddg gggghdddddddddg hc(445Q NC.AddCardType 410Q NC.AddCardType 353Q NC.AddCardType 316Q NC.AddCardType 251Q NC.AddCardType 207Q NC.AddCardType 150Q NC.AddCardType 111Q NC.AddCardType) (441Q Icon 424Q NC.MakeDocument 421Q TEXT 416Q Text 413Q Document 404Q Title 367Q NC.MakeLinkIndex 364Q TEXT 361Q Text 356Q LinkIndex 347Q Title 332Q NC.MakeSearchCard 327Q TEXT 324Q Text 321Q Search 304Q Title 270Q NC.BringUpBrowserCard 265Q NC.MakeBrowserCard 262Q GRAPH 257Q Graph 254Q Browser 240Q Title 223Q NC.MakeContentsCard 220Q TEXT 215Q Text 212Q FileBox 203Q Icon 170Q NC.SketchCardCloseFn 164Q NC.MakeSketchCard 161Q SKETCH 156Q NoteCard 153Q Sketch 144Q Title 131Q NC.GraphCardCloseFn 125Q NC.MakeGraphCard 122Q GRAPH 117Q NoteCard 114Q Graph 105Q Icon 72Q NC.TEditCloseFn 66Q NC.MakeTEditCard 63Q TEXT 60Q NoteCard 55Q Text 22Q Icon 2 NoteCard) () (PRETTYCOMPRINT FGHPATCH2COMS) (RPAQQ FGHPATCH2COMS ((* * Newly defined fns) (FNS NC.DetermineDisplayRegion) (FNS NC.DefaultCardWidth NC.DefaultCardHeight) (FNS NC.DefaultHeightFromType NC.DefaultWidthFromType) (* * Redefined old stuff ) (FNS NC.BringUpTEditCard NC.BringUpSketchCard NC.BringUpGraphCard) (FNS NC.MakeBrowserCard NC.MakeGraphCard NC.MakeContentsCard NC.MakeSketchCard NC.MakeTEditCard) (RECORDS NoteCardType SubstanceType) (FNS NC.AddCardType NC.AddSubstanceType NC.MakeSubstanceTypesList NC.MakeCardTypesList) (P (PROGN (NC.MakeSubstanceTypesList) (NC.MakeCardTypesList))))) (RECORD NoteCardType (TypeName SuperType SubstanceType MakeCardFn EditCardFn QuitCardFn GetCardFn PutCardFn CopyCardFn MarkCardDirtyFn CardDirtyPFn CollectLinksInCardFn DeleteLinksInCardFn UpdateLinkIconsInCardFn LinkDisplayMode CardDefaultWidth CardDefaultHeight)) (RECORD SubstanceType (SubstanceName CreateSubstanceFn EditSubstanceFn QuitSubstanceFn GetSubstanceFn PutSubstanceFn CopySubstanceFn MarkSubstanceDirtyFn SubstanceDirtyPFn CollectLinksInSubstanceFn DeleteLinksInSubstanceFn UpdateLinkIconsInSubstanceFn SubstanceDefaultWidth SubstanceDefaultHeight)) (PROGN (NC.MakeSubstanceTypesList) (NC.MakeCardTypesList)) (PUTPROPS FGHPATCH2 COPYRIGHT ("Xerox Corporation" 1985)) NIL