StdIn.cp 643 B

1234567891011121314151617181920212223
  1. (*
  2. * Library module for GP Component Pascal.
  3. * Low level reading and writing to the command-line console.
  4. * Original : kjg November 1998
  5. *
  6. *
  7. * This is a dummy module, it exists only to cause the
  8. * generation of a corresponding symbol file: StdIn.cps
  9. * when compiled with the -special flag.
  10. *)
  11. SYSTEM MODULE StdIn;
  12. PROCEDURE SkipLn*();
  13. (* Read past next line marker *)
  14. PROCEDURE ReadLn*(OUT arr : ARRAY OF CHAR);
  15. (* Read a line of text, discarding EOL *)
  16. PROCEDURE More*() : BOOLEAN; (* Return TRUE in gpcp v1.3! *)
  17. PROCEDURE Read*(OUT ch : CHAR); (* Get next character *)
  18. END StdIn.