BcdLister.mesa
Russ Atkinson, October 26, 1983 3:49 pm
DIRECTORY
BcdDefs USING [BCD],
IO USING [STREAM];
BcdLister:
DEFINITIONS = {
BCD: TYPE = BcdDefs.BCD;
RefBCD: TYPE = REF BCD;
STREAM: TYPE = IO.STREAM;
ListBcd:
PROC [stream,inStream:
STREAM, bcd: RefBCD, cmd:
ATOM];