Limit word names to 64 characters

lpereira · Jan 28, 2025 · f6e9852 · f6e9852
1 parent c5f3ea2
commit f6e9852
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/samples/forthsalon/forth.c b/src/samples/forthsalon/forth.c
@@ -316,6 +316,9 @@ static struct forth_word *new_word(struct forth_ctx *ctx,
                                    void *callback,
                                    bool compiler)
 {
+    if (len > 64)
+        return NULL;
+
     struct forth_word *word = malloc(sizeof(*word) + len + 1);
     if (UNLIKELY(!word))
         return NULL;