PeachPrint.mesa
Edited by Don Curry on July 24, 1986 4:35:10 pm PDT
Willie-Sue, June 12, 1986 1:44:25 pm PDT
PeachPrint: CEDAR DEFINITIONS IMPORTS IO =
BEGIN
PupAborted: ERROR;
localServer: Rope.ROPE;
DoPeachPrintCommand:
PUBLIC PROC
[server, file: Rope.ROPE, log: IO.STREAM ← IO.noWhereStream, fork: BOOLLSE, copies: INT𡤁];
FileNameLength: TYPE = {short, long, fullPath};
FileNameOrder: TYPE = {primary, secondary};
FileName:
PROC[
length: FileNameLength,
order: FileNameOrder,
index: INT ← 1,
ext: Rope.
ROPE ←
NIL ]
RETURNS[rope: Rope.ROPE];
END.