libs/cpascal/ProgArgs.cp

   1 (*
   2  *  Library module for GP Component Pascal.
   3  *  This module allows access to the arguments in programs which
   4  *  import CPmain.  It is accessible from modules which do NOT
   5  *  import CPmain.
   6  *
   7  *  Original : kjg December 1999
   8  *
   9  *  This is a dummy module, it exists only to cause the
  10  *  generation of a corresponding symbol file: ProgArgs.cps
  11  *  when compiled with the -nocode flag.
  12  *)
  13 SYSTEM MODULE ProgArgs;
  14
  15   PROCEDURE ArgNumber*() : INTEGER;
  16
  17   PROCEDURE GetArg*(num : INTEGER; OUT arg : ARRAY OF CHAR);
  18
  19   PROCEDURE GetEnvVar*(IN name : ARRAY OF CHAR; OUT valu : ARRAY OF CHAR);
  20
  21 END ProgArgs.