t_libc.mod 194 B

12345678
  1. MODULE tlibc;
  2. // FROM libc: intrinsic permissive external (printf/exit bind to C).
  3. FROM libc IMPORT printf, exit;
  4. VAR ExitCode : INTEGER;
  5. BEGIN
  6. printf("tlibc %d\n", 42);
  7. exit(42)
  8. END tlibc.