-- Compiler GriffinDefs		Main interface 
-- January 10, 1980  1:12 PM
-- Stone+Tiberi October 23, 1979  4:19 PM
-- Tiberi December 10, 1979  11:28 AM

DIRECTORY
	PointDefs: FROM "PointDefs",
	ObjectDefs: FROM "ObjectDefs",
	MenuDefs: FROM "MenuDefs";

GriffinDefs: DEFINITIONS =
BEGIN
UndoOp: TYPE = {move,xform,delete};

GriffinInit: PROGRAM;

--exported by figureops
RefreshGrid: PROCEDURE;
Grid: PROCEDURE[pt: PointDefs.ScrPt] RETURNS[PointDefs.ScrPt];
NoRefresh: BOOLEAN;


--Undoing:
SetUndoOp: PROCEDURE [op: UndoOp];
UndoMove: PROCEDURE;
UndoXForm: PROCEDURE;
UndoDelete: PROCEDURE;

--text:
TypeIn: PROCEDURE[ch: CHARACTER];
TypeInAtControlPt: PROCEDURE;
TypeIntoCaption: PROCEDURE [caption: ObjectDefs.ObjectHandle];
TypeIntoMenuItem: MenuDefs.MenuProc;
EndTypeIn: PROCEDURE;

UserMessage: SIGNAL[string: STRING];
ShowUserMessage: PROCEDURE[string: STRING];
NotXM,GriffinFull: SIGNAL;

--menus:
editMenu, objectMenu, styleMenu, shapeMenu, splineMenu, filesMenu, xformMenu, overlapMenu, displayMenu, viewMenu: MenuDefs.MenuHandle;

END.