MODULE Compiler;

FROM FIO IMPORT StdIn;
FROM SYSTEM IMPORT ADR;

FROM Lexer IMPORT Lexer, lexer_destroy, lexer_initialize;
FROM Transpiler IMPORT transpile;

VAR
  lexer: Lexer;

BEGIN
  lexer_initialize(ADR(lexer), StdIn);

  transpile(ADR(lexer));

  lexer_destroy(ADR(lexer))
END Compiler.