Start work on interpreter

2025-11-23 18:34:30 +11:00
parent 31cc30ee48
commit a69901be7b
7 changed files with 1460 additions and 1 deletions
--- a/src/interpreter.c
+++ b/src/interpreter.c
@@ -0,0 +1,97 @@
+#include "interpreter.h"
+#include "parser.h"
+#include "types.h"
+#include "include/uthash.h"
+#include <stdlib.h>
+
+int currentInstruction = 0;
+
+void runtimeError(GroundRuntimeError error, char* what, GroundInstruction* where, int whereLine) {
+    printf("Ground runtime error:\n  ErrorType: ");
+    switch (error) {
+        case ARG_TYPE_MISMATCH: {
+            printf("ArgTypeMismatch");
+            break;
+        }
+        case TOO_FEW_ARGS: {
+            printf("TooFewArgs");
+            break;
+        }
+        case TOO_MANY_ARGS: {
+            printf("TooManyArgs");
+            break;
+        }
+        default:
+        case FIXME: {
+            printf("FIXME (please report issue to https://chsp.au/ground/cground)");
+        }
+    }
+    printf("\n");
+    if (what != NULL) {
+        printf("  ErrorContext: %s\n", what);
+    }
+    if (where != NULL) {
+        printf("  ErrorInstruction: ");
+        printGroundInstruction(where);
+        printf("\n");
+    }
+    if (whereLine > -1) {
+        printf("  ErrorLine: %d\n", whereLine + 1);
+    }
+    exit(1);
+}
+
+void interpretGroundProgram(GroundProgram* in) {
+    // Preprocess all labels
+    for (int i = 0; i < in->size; i++) {
+        if (in->instructions[i].type == CREATELABEL) {
+            // labelHashmap.addLabel()
+        }
+    }
+    while (currentInstruction < in->size) {
+        interpretGroundInstruction(&in->instructions[currentInstruction]);
+        currentInstruction++;
+    }
+    
+}
+
+void interpretGroundInstruction(GroundInstruction* in) {
+    switch (in->type) {
+        // We can safely ignore any CREATELABEL instructions, these have been preprocessed
+        case CREATELABEL: {
+            break;
+        }
+        case PRINT: {
+            if (in->args.length < 1) {
+                runtimeError(TOO_FEW_ARGS, NULL, in, currentInstruction);
+            }
+            for (int i = 0; i < in->args.length; i++) {
+                printGroundArg(&in->args.args[i]);
+                printf(" ");
+            }
+            break;
+        }
+        case PRINTLN: {
+            if (in->args.length < 1) {
+                runtimeError(TOO_FEW_ARGS, NULL, in, currentInstruction);
+            }
+            for (int i = 0; i < in->args.length; i++) {
+                printGroundArg(&in->args.args[i]);
+                printf(" ");
+            }
+            printf("\n");
+            break;
+        }
+        case END: {
+            if (in->args.length < 1) {
+                exit(0);
+            } else {
+            }
+            break;
+        }
+        default: {
+            runtimeError(FIXME, "Currently unimplemented instruction", in, currentInstruction);
+        }
+    }
+
+}