DIRECTORY Icons USING [IconFlavor], Rope USING [ROPE], ViewerClasses USING [PaintProc, SaveProc, Viewer], Imager USING [Context], SilKernel USING [SilData, SilDisplayData] ; SilDisplay: CEDAR DEFINITIONS = BEGIN ROPE: TYPE = Rope.ROPE; SilDisplayData: TYPE = SilKernel.SilDisplayData; InitSil: PROC[]; InitSilDisplayInstance: PROC [data: SilKernel.SilData, name: ROPE _ NIL, instance: NAT] RETURNS [viewer: ViewerClasses.Viewer]; NeedRebuild: PROC[displayData: SilDisplayData] RETURNS [rebuild: BOOL]; CancelRebuild: PROC[displayData: SilDisplayData]; CaretBlink: PROC[]; GetIcon: PROC [dirtyIcon: BOOL _ FALSE] RETURNS [Icons.IconFlavor]; SilSaveProc: ViewerClasses.SaveProc; SilPaintProc: ViewerClasses.PaintProc; SilUIPaint: PROC [data: SilKernel.SilData, viewer: ViewerClasses.Viewer, ctx: Imager.Context]; END. ήSilDisplay.Mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Created By Tracy Larrabee, March 29, 1984 1:03:52 pm PST Last Edited by Ken Pier, August 16, 1985 6:15:39 pm PDT This module contains the definitions for procedures which are used in the SilKernel implementation module (these procedures will either be registered with the window manager by SilKernel or called directly by SilKernel). The first four procs are called by SilKernel to initialize things, start a new Sil display, find out the state of a display, or force the blinking of the Sil Carets. This procedure will initialize all of Sil's internal structure related to the display by creating the correct font references. Get the display on the screen and initialize all pertinent structures. TRUE if the display should be rebuilt. May be called to cancel a rebuild IF the viewer has gone iconic. Make sure that all the appropriate Sil Instances know to blink their carets. Returns either of the two Sil icons, the clean or the dirty, depending on the BOOL The next two procs are registered with Viewers. [self: Viewer, force: BOOL _ FALSE] Save the contents of the viewer. [self: Viewer, context: Graphics.Context, whatChanged: REF, clear: BOOL. Κΐ˜code™Kšœ Οmœ1™<—K™8K™7K™K™άK˜šΟk ˜ Kšœžœ˜Kšœžœžœ˜Kšœžœ˜2Kšœžœ ˜Kšœ žœ˜)K˜—K˜šΟn œžœž œž˜%K˜Kšžœžœžœ˜Kšœžœ˜0K˜K™₯K˜šŸœžœ˜K™~K™—š Ÿœžœ!žœžœ žœžœ ˜KšœF™FK™—šŸ œžœžœ žœ˜GK™&K™—šŸ œžœ˜1K™@K™—šŸ œžœ˜K™L—K˜š Ÿœžœ žœžœžœ˜CKšœNž™RK™—™/K™—šŸ œ˜$Kšœžœžœ™#K™ K™—šŸ œ˜&KšœH™HK™—šŸ œžœN˜^K™——Kšžœ˜—…—8 Φ