Catch overflow in header size

gap-system · Sep 23, 2023 · a57d6f4 · a57d6f4
1 parent 0fb705c
commit a57d6f4
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/code.c b/src/code.c
@@ -259,6 +259,10 @@ Stat NewStatOrExpr(CodeState * cs, UInt type, UInt size, UInt line)
     StatHeader * header = STAT_HEADER(cs, stat);
     header->line = line;
     header->size = size;
+    // check size fits inside header
+    if (header->size != size) {
+        Panic("Function too large");
+    }
     header->type = type;
     RegisterStatWithHook(GET_GAPNAMEID_BODY(cs->currBody), line, type);
     // return the new statement