home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / MODULAV2GERMAN.DMS / in.adf / Def.zoo / Serial.def < prev    next >
Encoding:
Modula Definition  |  1988-11-06  |  1.2 KB  |  59 lines
  1. (*$M-*)
  2. DEFINITION MODULE Serial;
  3.  
  4. FROM SYSTEM IMPORT 
  5.  ADDRESS,BYTE,LONGSET;
  6. FROM Exec IMPORT
  7.  nonstd,IOFlagSet,IOStdReq,UByte;
  8.  
  9. CONST
  10.  serialName="serial.device";
  11.  query=nonstd;
  12.  break=nonstd+1;
  13.  setParams=nonstd+2;
  14.  mark=LONGSET{0};
  15.  mSpOn=LONGSET{1};
  16.  active=IOFlagSet{4};
  17.  abort=IOFlagSet{5};
  18.  queued=IOFlagSet{6};
  19.  bufrRead=IOFlagSet{7};
  20.  
  21. TYPE
  22.  IOTArray=RECORD
  23.   termArray0:LONGCARD;
  24.   termArray1:LONGCARD;
  25.  END;
  26.  SerFlags=(
  27.   partyOn,partyOdd,sevenWire,queuedBrk,radBoogie,shared,
  28.   eofMode,xDisabled
  29.  );
  30.  SerFlagSet=SET OF SerFlags;
  31.  Status=(
  32.   busy,paperOut,select,dataSetReady,clearToSend,carrierDetect,
  33.   readyToSend,dataTerminalReady,overrun,wroteBreak,readBreak,
  34.   xOffWrite,xOffRead
  35.  );
  36.  StatusSet=SET OF Status;
  37.  Error=(
  38.   e0,devBusy,baudMismatch,invBaud,bufErr,invParam,lineErr,
  39.   notOpen,portReset,parityErr,initErr,timerErr,bufOverflow,
  40.   nodsr,nocts,detectedBreak
  41.  );
  42.  IOSerial=RECORD
  43.   ioSer:IOStdReq;
  44.   ctlChar:LONGCARD;
  45.   rBufLen:LONGCARD;
  46.   extFlags:LONGSET;
  47.   baud:LONGCARD;
  48.   brkTime:LONGCARD;
  49.   termArray:IOTArray;
  50.   readLen:UByte;
  51.   writeLen:UByte;
  52.   stopBits:UByte;
  53.   serFlags:SerFlagSet;
  54.   status:StatusSet;
  55.  END;
  56.  IOSerialPtr=POINTER TO IOExtSer;
  57.  
  58. END Serial.
  59.