Make procedure name after the end
This commit is contained in:
@ -3,16 +3,16 @@ module Compiler;
|
||||
from FIO import StdIn;
|
||||
from SYSTEM import ADR;
|
||||
|
||||
from Lexer import Lexer, LexerDestroy, LexerInitialize;
|
||||
from Transpiler import Transpile;
|
||||
from Lexer import Lexer, lexer_destroy, lexer_initialize;
|
||||
from Transpiler import transpile;
|
||||
|
||||
var
|
||||
ALexer: Lexer;
|
||||
|
||||
BEGIN
|
||||
LexerInitialize(ADR(ALexer), StdIn);
|
||||
begin
|
||||
lexer_initialize(ADR(ALexer), StdIn);
|
||||
|
||||
Transpile(ADR(ALexer));
|
||||
transpile(ADR(ALexer));
|
||||
|
||||
LexerDestroy(ADR(ALexer))
|
||||
END Compiler.
|
||||
lexer_destroy(ADR(ALexer))
|
||||
end Compiler.
|
||||
|
Reference in New Issue
Block a user