19 lines
294 B
Plaintext
19 lines
294 B
Plaintext
module Compiler;
|
|
|
|
from FIO import StdIn;
|
|
from SYSTEM import ADR;
|
|
|
|
from Lexer import Lexer, LexerDestroy, LexerInitialize;
|
|
from Transpiler import Transpile;
|
|
|
|
VAR
|
|
ALexer: Lexer;
|
|
|
|
BEGIN
|
|
LexerInitialize(ADR(ALexer), StdIn);
|
|
|
|
Transpile(ADR(ALexer));
|
|
|
|
LexerDestroy(ADR(ALexer))
|
|
END Compiler.
|