-- 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 --z20461(529)\f1