<> <> <> <> <> <> <<>> <> DIRECTORY PrincOps USING [ByteBltBlock]; RS232CEnvironment: DEFINITIONS = BEGIN AutoRecognitionOutcome: TYPE = RECORD [[0..15]]; CharLength: TYPE = [5..8]; CompletionHandle: TYPE [2]; Correspondent: TYPE = RECORD [[0..255]]; LineSpeed: TYPE = {bps50, bps75, bps110, bps134p5, bps150, bps300, bps600, bps1200, bps2400, bps3600, bps4800, bps7200, bps9600}; LineType: TYPE = {bitSynchronous, byteSynchronous, asynchronous, autoRecognition}; Parity: TYPE = {none, odd, even, one, zero}; PhysicalRecordHandle: TYPE = POINTER TO PhysicalRecord; PhysicalRecord: TYPE = RECORD [header, body, trailer: Block]; StopBits: TYPE = [1..2]; SyncCount: TYPE = [0..7]; SyncChar: TYPE = [0..256); Block: TYPE = PrincOps.ByteBltBlock; END. <<>> <> <> <> <> <<>>