PressOverlay.mesa
Michael Plass, May 17, 1984 9:25:09 am PDT
DIRECTORY
PressReader
USING
[FontDirectoryEntry, Handle],
Rope
USING
[
ROPE
],
SirPress
USING
[PressHandle];
PressOverlay:
CEDAR
DEFINITIONS
=
BEGIN
CopyPressPage
:
PROC
[pressHandle: SirPress.PressHandle, pressFile: PressReader.Handle, pageNumber:
INT
, fontTable:
REF
ARRAY
[0..6*16)
OF
PressReader.FontDirectoryEntry]
RETURNS
[ok:
BOOLEAN
←
TRUE
];
Overlay
:
PUBLIC
PROC
[outputName, inputName1, inputName2: Rope.
ROPE
];
END
.