Add A command line parsing procedure

2025-05-31 11:27:23 +02:00
parent a93d12eb50
commit 0e8f62b217
11 changed files with 599 additions and 377 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.