MODULE ShellSerial; IMPORT Modules, Kernel, Commands, Streams, Files, Serials, Shell, XYModem; CONST BufferSize = 1024; DefaultPrompt = \"SHELL>"\; VAR shells: ARRAY (Serials.MaxPorts + 1) OF Shell.Shell; PROCEDURE ^ ModemReceive(context: Commands.Context; modemMode: LONGINT); PROCEDURE ^ XReceive*(context: Commands.Context); PROCEDURE ^ YReceive*(context: Commands.Context); PROCEDURE ^ Wait(ms: LONGINT); PROCEDURE ^ Open*(context: Commands.Context); PROCEDURE ^ Cleanup; BEGIN END ShellSerial.