% startg.jam
% last changed by Doug Wyatt, 19-Feb-82 10:26:48

(startg.jam of 19-Feb-82
).print
(user) .dup .where {.pop .pop}{256 .dict .def}.ifelse .cvx .exec
user .begin
(/run){(Running ).print .dup .print .run (.)=}.cvx .def
(/loadbcd){(Loading ).print .dup .print .loadbcd (.)=}.cvx .def
(util.jam)/run
(errordefs.jam)/run
.end
(.start){user .begin .version =
(JaMGraphicsTool.bcd)/loadbcd
(JaMGraphicsImpl.bcd)/loadbcd
} .cvx .def
.start
(graphics.jam)/run