AdobeUI.mesa
Copyright Ó 1990, 1991, 1992 by Xerox Corporation. All rights reserved.
Philip James, March 9, 1992 1:13 pm PST
DIRECTORY
AdobeCommon,
AdobeOps USING [ToolType],
AdobeTool USING [CurrentButtonProcData],
Rope USING [ROPE],
ViewerClasses USING [MouseButton];
AdobeUI: CEDAR DEFINITIONS = {
Handle: TYPE = AdobeCommon.Handle;
HandleField: PROCEDURE [h: Handle, field: INTEGER,
mouseButton: ViewerClasses.MouseButton, title: Rope.ROPE ¬ NIL, selections: LIST OF Rope.ROPE ¬ NIL] RETURNS [which: INT ¬ 0];
AbortCheckOut: PROCEDURE [h: Handle];
AddButtons: PROCEDURE [handle: Handle];
AnotherTool: PROCEDURE [h: Handle ¬ NIL];
ChangeSystem: PROCEDURE [h: Handle];
Clear: PROCEDURE [h: Handle];
CheckField: PROC [enumData: AdobeCommon.EnumeratedTypes];
CheckIn: PROC [h: Handle];
CheckInAndOut: PROC [h: Handle];
CheckInAndExamine: PROC [h: Handle];
CheckOut: PROC [h: Handle];
CurrentButton: PROC [data: AdobeTool.CurrentButtonProcData, parent: AdobeCommon.Box];
EditFilename: PROC [h: Handle, mouseButton: ViewerClasses.MouseButton];
Examine: PROC [h: Handle];
Get: PROC [h: Handle];
GetNumber: PROCEDURE [handle: Handle] RETURNS [CARDINAL ¬ LAST[CARDINAL]];
HintMenu: PROC [buttonData: AdobeCommon.EnumeratedTypes, mouseButton: ViewerClasses.MouseButton];
ListAction: PROC [h: Handle, mouseButton: ViewerClasses.MouseButton];
MakeAdobeTool: PROC [parent: Handle ¬ NIL];
Next: PROC [h: Handle];
NumberEquals: PROC [h: Handle, mouseButton: ViewerClasses.MouseButton];
OutputFormat: PROC [h: Handle];
Overwrite: PROC [h: Handle];
Previous: PROC [h: Handle];
Put: PROC [h: Handle];
QLOperandProc: PROCEDURE [h: Handle, mouseButton: ViewerClasses.MouseButton, which: CARD, title: Rope.ROPE];
ReportOutputFile: PROCEDURE [h: Handle, mouseButton: ViewerClasses.MouseButton];
ReportTemplateFile: PROCEDURE [h: Handle, mouseButton: ViewerClasses.MouseButton];
ResetQL: PROCEDURE [h: Handle];
RopeFromTool: PROCEDURE [tool: AdobeOps.ToolType] RETURNS [rope: Rope.ROPE ¬ NIL];
ShowElements: PROCEDURE [h: Handle];
Submit: PROCEDURE [h: Handle];
SubmitFieldButton: PROCEDURE [data: AdobeTool.CurrentButtonProcData, mouseButton: ViewerClasses.MouseButton];
SystemMenu: PROCEDURE [h: Handle];
ToolMenu: PROCEDURE [h: Handle];
UseQL: PROCEDURE [h: Handle];
WhichQL: PROCEDURE [h: Handle, mouseButton: ViewerClasses.MouseButton];
WhichQL2: PROCEDURE [h: Handle, mouseButton: ViewerClasses.MouseButton];
}.