CPmain.cp 666 B

12345678910111213141516171819
  1. (*
  2. * Library module for GP Component Pascal.
  3. * This module name is "magic" in the sense that its name is known
  4. * to the compiler. If it is imported, the module will be compiled
  5. * so that its body is named "main" with an arglist, rather than
  6. * being in the static initializer <clinit>()V in JVM-speak.
  7. *
  8. * Original : kjg November 1998
  9. *
  10. * This is a dummy module, it exists only to cause the
  11. * generation of a corresponding symbol file: CPmain.cps
  12. * when compiled with the -special flag.
  13. *)
  14. SYSTEM MODULE CPmain;
  15. PROCEDURE ArgNumber*() : INTEGER;
  16. PROCEDURE GetArg*(num : INTEGER; OUT arg : ARRAY OF CHAR);
  17. END CPmain.