Start a Modula-2 experiment

boot/Compiler.mod

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