-- 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
(600)\263b10B11b16B33b16B45b1B1b13B56b18B71b18B54b20B66b2B