Make procedure name after the end

This commit is contained in:
2025-05-29 14:59:22 +02:00
parent 4adac0531f
commit 273e26b119
7 changed files with 765 additions and 797 deletions

18
source/Compiler.mod Normal file
View File

@ -0,0 +1,18 @@
MODULE Compiler;
FROM FIO IMPORT StdIn;
FROM SYSTEM IMPORT ADR;
FROM Lexer IMPORT Lexer, lexer_destroy, lexer_initialize;
FROM Transpiler IMPORT transpile;
VAR
ALexer: Lexer;
BEGIN
lexer_initialize(ADR(ALexer), StdIn);
transpile(ADR(ALexer));
lexer_destroy(ADR(ALexer))
END Compiler.