6 lines
141 B
Modula-2
6 lines
141 B
Modula-2
(*$Foreign*)
|
|
DEFINITION MODULE Test;
|
|
PROCEDURE finished();
|
|
PROCEDURE writehex(code: LONGINT);
|
|
PROCEDURE fail(code: LONGINT);
|
|
END Test.
|