-- RS232CIO.pack, last edited by Danielson on: 4-Dec-81 13:06:16 RS232CIO: SEGMENT = BEGIN HotRS232CIO: CODE PACK = BEGIN RS232CDriverB[ENTRY VECTOR, Get, Put, TransferWait, TransmitNow]; END; WarmRS232CIO: CODE PACK = BEGIN RS232CDriverB[DecrementStatusWaitCount, GetStatus, IncrementStatusWaitCount, Restart, SendBreak, SetParameter, StatusWait, Suspend]; END; ColdRS232CIO: CODE PACK = BEGIN DialupImpl[MAIN, ENTRY VECTOR, AbortCall, Dial, GetDialerCount, ResetDialer, WaitFor]; RS232CDriverA[MAIN, ENTRY VECTOR, CATCH CODE, Create, GetNextLine, Delete, FreeChannelHandle, RedefineChannelUse, GetChannelHandle, GetLockAndFreeChannelHandle, Start, Stop]; RS232CDriverB[MAIN, CATCH CODE, AutoRecognitionWait, DeleteChannel, SetLineType]; END; END; -- Frame Packs HotRS232CIOFrames: FRAME PACK = BEGIN DialupImpl; RS232CDriverA; RS232CDriverB; END;