-- JaMControlDefs.mesa
-- Written by John Warnock, Feb. 1979.
-- Last changed by Doug Wyatt, April 1, 1980 11:42 PM

DIRECTORY
JaMMasterDefs: FROM "JaMMasterDefs" USING [
CommandArray, Frame, Object];

JaMControlDefs: DEFINITIONS =
BEGIN OPEN JaMMasterDefs;

JaMControl: PROGRAM;

GetCurrentFrame: PROCEDURE RETURNS[frm: Frame];

GetCommandArray: PROCEDURE RETURNS[POINTER TO CommandArray];

NotifyCommand: PROCEDURE[stringname: STRING, procedure: PROCEDURE];

NotifyStringObject: PROCEDURE[sob: POINTER TO StringType Object,
stringvalue: STRING];

RegisterExtCommand: PROCEDURE[stringname: STRING, procedure: PROCEDURE];

RegisterIntCommand: PROCEDURE[procedure: PROCEDURE]
RETURNS[c: CommandType Object];

END.

DKW March 28, 1980 4:58 PM
removed InitVMControl, added AddStartProc

DKW April 1, 1980 4:10 PM
added NotifyCommand, NotifyStringObject
removed RegisterString, AddStartProc
renamed RegisterCommand to RegisterExtCommand

DKW April 1, 1980 11:34 PM
GetCommandArray no longer returns command index count