belka/elna
1
0
Fork 0
Code Issues 5 Pull Requests Releases Activity

Create a parser context

Browse Source
This commit is contained in:
Eugen Wissner
2025-06-13 15:23:59 +02:00
parent fdaeb25f73
commit fac024d1f3
9 changed files with 278 additions and 246 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
source/Transpiler.mod
View File

@ -610,12 +610,13 @@ BEGIN
INC(counter)
END
END transpile_module_name;
PROCEDURE transpile(ast_module: PAstModule; output: File; input_name: ShortString);
PROCEDURE transpile(ast_module: PAstModule; output: File; definition: File; input_name: ShortString);
VAR
context: TranspilerContext;
BEGIN
context.input_name := input_name;
context.output := output;
context.definition := definition;
context.indentation := 0;
transpile_module(ADR(context), ast_module)