From 31ae9a14ef4d76eaf3ad79fb31477ea4596d047e Mon Sep 17 00:00:00 2001
From: dan <me@danrh.co.uk>
Date: Fri, 2 Jun 2023 22:38:16 -0400
Subject: feat: can overwrite existing functions

---
 forthmachine.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'forthmachine.c')

diff --git a/forthmachine.c b/forthmachine.c
index 3820dde..4532f78 100644
--- a/forthmachine.c
+++ b/forthmachine.c
@@ -45,7 +45,7 @@ static void op_exec(wordop* op, forthmachine* fm) {
 
 static void forthmachine_exec(forthmachine* fm, char *word, int len, char* line, int* i) {
     if (0 == strcmp(word, ":")) {
-        defineop(fm, line, i);
+        optable_defineop(fm->ot, line, i);
         return;
     }
     wordop* op = optable_getop(fm->ot, word);
-- 
cgit v1.2.3