18 lines
300 B
Modula-2
18 lines
300 B
Modula-2
DEFINITION MODULE Transpiler;
|
|
|
|
FROM FIO IMPORT File;
|
|
|
|
FROM Lexer IMPORT PLexer, Lexer;
|
|
|
|
TYPE
|
|
TranspilerContext = RECORD
|
|
indentation: CARDINAL;
|
|
output: File;
|
|
lexer: PLexer
|
|
END;
|
|
PTranspilerContext = POINTER TO TranspilerContext;
|
|
|
|
PROCEDURE transpile(ALexer: PLexer);
|
|
|
|
END Transpiler.
|