Screen.mesa
Copyright (C) 1981, 1984 Xerox Corporation. All rights reserved.
Author: John Maxwell
last modified: November 2, 1981 12:54 PM
Edited by Doug Wyatt, June 14, 1984 5:24:44 pm PDT
DIRECTORY
Graphics;
Screen: CEDAR DEFINITIONS
= BEGIN
screen: Graphics.Context;
InvertListen: PROC;
InvertPlay: PROC;
DisplayMessage: PROC[s: STRING];
CommandProcs: TYPE = RECORD[
play: PROC,
listen: PROC,
redbug: PROC,
yellowbug: PROC,
bluebug: PROC,
keyboard: PROC,
scroll: PROC[y: INTEGER],
thumb: PROC,
display: PROC[redraw: BOOL],
fileIn: PROC[s: STRING, append: BOOL],
fileOut: PROC[s: STRING],
hardcopy: PROC[s: STRING],
initialize: PROC[Graphics.Context],
count: CARDINAL
];
END.