-- StanfordJaMRun.mesa
-- Last changed by Doug Wyatt, January 16, 1981 11:54 AM

DIRECTORY
ImageDefs USING [MakeImage],
JaMControlDefs USING [JaMControl],
JaMGraphicsDefs USING [JaMGraphicsImpl],
JaMSnapDefs USING [JaMSnapImpl],
JaMStartDefs USING [RunJaM],
Real USING [RealControl];

StanfordJaMRun: PROGRAM
IMPORTS ImageDefs,JaMControlDefs,JaMGraphicsDefs,
JaMSnapDefs,JaMStartDefs,Real = {

-- This is the main control module for JaM.

START Real.RealControl;
START JaMControlDefs.JaMControl;

-- MakeImage goes here
ImageDefs.MakeImage["JaM.image"];

RESTART JaMControlDefs.JaMControl;

-- Start other modules here
START JaMGraphicsDefs.JaMGraphicsImpl;
START JaMSnapDefs.JaMSnapImpl;

JaMStartDefs.RunJaM;

}.