Add a command line parsing procedure

2025-05-31 11:28:24 +02:00
parent 6e415e474f
commit 1983ef8e71
13 changed files with 1097 additions and 412 deletions
--- a/source/Transpiler.def
+++ b/source/Transpiler.def
@ -1,7 +1,17 @@
 DEFINITION MODULE Transpiler;

-FROM Lexer IMPORT PLexer;
+FROM FIO IMPORT File;

-PROCEDURE transpile(ALexer: PLexer);
+FROM Lexer IMPORT PLexer, Lexer;
+
+TYPE
+  TranspilerContext = RECORD
+    indentation: CARDINAL;
+    output: File;
+    lexer: PLexer
+  END;
+  PTranspilerContext = POINTER TO TranspilerContext;
+
+PROCEDURE transpile(lexer: PLexer; output: File);

 END Transpiler.