home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1988-11-06 | 658 b | 35 lines |
- (*$M-*)
- DEFINITION MODULE Parallel;
-
- FROM Exec IMPORT
- IOStdReq,nonstd;
-
- CONST
- parallelName="parallel.device";
- query=nonstd;
- setParams=nonstd+1;
-
- TYPE
- IOPArray=RECORD
- pTermArray0:LONGCARD;
- pTermArray1:LONGCARD;
- END;
- ParErr=(
- pe0,devBusy,bufTooBig,invParam,lineErr,notOpen,portReset,
- initErr
- );
- ParFlags=(pf0,eofMode,pf2,radBoogie,pf4,shared);
- ParFlagSet=SET OF ParFlags;
- Status=(pSel,paperOut,pBusy,rwDir,active,abort,queued);
- StatusSet=SET OF Status;
- IOParallel=RECORD
- ioPar:IOStdReq;
- pExtFlags:LONGCARD;
- status:StatusSet;
- parFlags:ParFlagSet;
- pTermArray:IOPArray;
- END;
- IOParallelPtr=POINTER TO IOParallelPar;
-
- END Parallel.
-