MachineDependentPopping.Mesa
Copyright Ó 1991 by Xerox Corporation. All rights reserved.
Last tweaked by Mike Spreitzer on September 6, 1989 5:49:10 pm PDT
DIRECTORY Rope, TIPUser;
MachineDependentPopping: CEDAR DEFINITIONS
= {
ROPE: TYPE ~ Rope.ROPE;
ScreenCoords: TYPE ~ RECORD [x, y: INTEGER, color: BOOL];
GetCurrentMouse: PROC RETURNS [ScreenCoords];
SetMouse: PROC [ScreenCoords];
maySetMouse: READONLY BOOL;
MayNotSetMouse: ERROR;
ToScreenCoords: PROC [REF ANY] RETURNS [ScreenCoords];
Arg may be either:
a REF ScreenCoords,
a machine-dependent REF (REF Interminal.MousePosition or REF UserInput.MousePosition),
or NIL (in which case the current mouse position is returned).
GetCaller2sGlobalFrame: PROC RETURNS [POINTER]
~ TRUSTED INLINE {RETURN [NIL]};
GetFullFilename: PROC [hint, wDir: ROPE] RETURNS [full, ohneVersion: ROPE];
GetWDir: PROC RETURNS [ROPE];
SetTipTable: PROC [TIPUser.TIPTable];
MatchEvent: PROC [actionQueue, action: REF ANY] RETURNS [LIST OF REF ANY];
}.