-- 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;