19 lines
372 B
Modula-2
19 lines
372 B
Modula-2
DEFINITION MODULE Transpiler;
|
|
|
|
FROM FIO IMPORT File;
|
|
|
|
FROM Common IMPORT ShortString;
|
|
FROM Lexer IMPORT PLexer, Lexer;
|
|
|
|
TYPE
|
|
TranspilerContext = RECORD
|
|
input_name: ShortString;
|
|
output: File;
|
|
lexer: PLexer
|
|
END;
|
|
PTranspilerContext = POINTER TO TranspilerContext;
|
|
|
|
PROCEDURE transpile(lexer: PLexer; output: File; input_name: ShortString);
|
|
|
|
END Transpiler.
|