DEFINITION MODULE Args ;

(*
    Title      : Args
    Author     : Gaius Mulley
    System     : UNIX (gm2)
    Date       : Thu Jun 16 15:40:36 1994
    Last edit  : Thu Jun 16 15:40:36 1994
    Description: provides a simple interface to the command
                 line arguments.
*)

EXPORT QUALIFIED GetArg, Narg ;


(*
   GetArg - returns the nth argument from the command line.
            The success of the operation is returned.
*)

PROCEDURE GetArg (VAR a: ARRAY OF CHAR ; i: CARDINAL) : BOOLEAN ;


(*
   Narg - returns the number of arguments available from
          command line.
*)

PROCEDURE Narg() : CARDINAL ;


END Args.