| 123456789101112131415 |
- DEFINITION MODULE FOR "C" M2makeC;
- (* GNU Modula-2 binding of the NUL-string (_s) half of m2make_os.c.
- gm2-only file: imported solely by M2makeOS_gm2.mod. *)
- FROM SYSTEM IMPORT ADDRESS;
- EXPORT UNQUALIFIED m2osExistS, m2osMtimeS, m2osSystemS, m2osBye,
- m2osOpenreadS, m2osReadlineS, m2osClose;
- PROCEDURE m2osExistS(s: ARRAY OF CHAR): BOOLEAN;
- PROCEDURE m2osMtimeS(s: ARRAY OF CHAR; VAR t: LONGINT): BOOLEAN;
- PROCEDURE m2osSystemS(s: ARRAY OF CHAR): INTEGER;
- PROCEDURE m2osBye(code: INTEGER);
- PROCEDURE m2osOpenreadS(s: ARRAY OF CHAR): ADDRESS;
- PROCEDURE m2osReadlineS(h: ADDRESS; VAR buf: ARRAY OF CHAR;
- cap: CARDINAL): BOOLEAN;
- PROCEDURE m2osClose(h: ADDRESS);
- END M2makeC.
|