-- file: LaurelDriverDefs.mesa
-- created by Schroeder, April 26, 1979 3:10 PM.
-- edited by Levin: January 8, 1981 11:54 AM
-- edited by Brotz: September 5, 1980 1:58 PM
DIRECTORY
ControlDefs: FROM "ControlDefs",
dsD: FROM "DisplayDefs",
ImageDefs: FROM "ImageDefs",
ovD: FROM "OverviewDefs",
ProcessDefs;
drD: DEFINITIONS =
BEGIN
-- Font Stuff
ALFont: TYPE = MACHINE DEPENDENT RECORD[
height: CARDINAL,
proportional: BOOLEAN,
baseline: [0..177B],
maxWidth: [0..255B],
charTable: ARRAY CHARACTER OF SelfRelativePointer];
SelfRelativePointer: TYPE = CARDINAL;
font: PUBLIC POINTER TO drD.ALFont;
smudgeXwValue: CARDINAL = 6;
-- Miscellaneous Stuff
videoBackground: dsD.backgtype;
InstallError: TYPE = {none, inLog, noLog};
CommandLineAction: TYPE = {gmfOnly, sendOnly, checkOnly, gnmAndStay, sendBug};
CapturePupGlitch: PROCEDURE[why: UNSPECIFIED -- DriverDefs.GlitchType --];
Catcher: PROCEDURE[msg: UNSPECIFIED, signal: SIGNAL[UNSPECIFIED], frame: ControlDefs.FrameHandle];
ProcessBugReport: PROCEDURE;
PreStopInitialization: PROCEDURE
RETURNS [commandInCommandLine: CommandLineAction, installError: InstallError];
ResumeNub: PORT [commandInCommandLine: CommandLineAction, installError: InstallError];
-- The following are exported by LaurelInterrupt
interruptPriority: ProcessDefs.Priority = -- NucleusOps.InterruptPriority -- 6;
interruptWakeup: CONDITION;
InterruptProcess: PROCEDURE;
END. -- of LaurelDriverDefs --