DEFINITION MODULE M2Kermit;
(************************************************************************)
(* This is the main body of the Modula-2 Kermit version. It reads a     *)
(* command line and interprets it                                       *)
(* written:            09.01.86     Matthias Aebi                       *)
(* last modification:  17.03.86     Matthias Aebi                       *)
(************************************************************************)

EXPORT QUALIFIED Param1, Param2, VersionStr;

CONST
    VersionStr = "Modula-2 Kermit, Version 1.0 / Lilith";

VAR
    Param1 : ARRAY [0..31] OF CHAR; (* 1st & 2nd parameter we found *)
    Param2 : ARRAY [0..31] OF CHAR; (* on the command line          *)

END M2Kermit.

.
