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