Start reimplementation in typescript

src/vm/commands/infile.ts

@@ -0,0 +1,16 @@
+import {Command, ParseContext, StrTerm} from "./command.js";
+import {LexInput} from "../lexer.js";
+
+export class InFile extends Command<{ path: StrTerm }> {
+    isParseCandidate(token: LexInput): boolean {
+        return this.isKeyword(token, 'infile')
+    }
+
+    attemptParse(context: ParseContext): { path: StrTerm } {
+        return { path: context.popTerm() }
+    }
+
+    getDisplayName(): string {
+        return 'infile'
+    }
+}