diff options
author | dan <[email protected]> | 2023-06-02 22:38:16 -0400 |
---|---|---|
committer | dan <[email protected]> | 2023-06-02 22:38:16 -0400 |
commit | 31ae9a14ef4d76eaf3ad79fb31477ea4596d047e (patch) | |
tree | a00850c3d809fc7b31ed9183c5f617125df18ac9 /forthmachine.c | |
parent | e0fcdc6e3577f8c40b019396b400928379d928b9 (diff) | |
download | forth-31ae9a14ef4d76eaf3ad79fb31477ea4596d047e.tar.gz forth-31ae9a14ef4d76eaf3ad79fb31477ea4596d047e.tar.bz2 forth-31ae9a14ef4d76eaf3ad79fb31477ea4596d047e.zip |
feat: can overwrite existing functions
Diffstat (limited to 'forthmachine.c')
-rw-r--r-- | forthmachine.c | 2 |
1 files changed, 1 insertions, 1 deletions
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); |