PDInterpMainImpl.mesa
Michael Plass, November 18, 1983 3:34 pm
DIRECTORY PDInterpReader, PDInterpPage, Process;
PDInterpMainImpl:
PROGRAM
IMPORTS PDInterpReader, PDInterpPage, Process =
BEGIN
Main:
PROC = {
DO
reader: PDInterpReader.Handle ← PDInterpReader.Open[];
WHILE PDInterpPage.InterpretPage[reader].ok DO ENDLOOP;
reader ← PDInterpReader.Close[reader];
ENDLOOP;
};
Process.Detach[
FORK Main[]];
END.