Squashed 'lispBM/lispBM/' changes from ccc08bc3..72f05666

72f05666 extended setvar functionality to heap defined variables

git-subtree-dir: lispBM/lispBM
git-subtree-split: 72f05666afed4bd3a506803724f98f17ce4300c5
This commit is contained in:
Benjamin Vedder 2022-02-22 21:39:18 +01:00
parent b880b5f0d8
commit 0a2eb07a6d
1 changed files with 5 additions and 0 deletions

View File

@ -23,6 +23,8 @@
#include "eval_cps.h"
#include "print.h"
#include "lbm_variables.h"
#include "env.h"
#include <stdio.h>
#include <math.h>
@ -585,6 +587,9 @@ lbm_value lbm_fundamental(lbm_value* args, lbm_uint nargs, lbm_value op) {
if (s >= VARIABLE_SYMBOLS_START &&
s < VARIABLE_SYMBOLS_END) {
result = lbm_set_var(s, args[1]);
} else {
*lbm_get_env_ptr() = lbm_env_set(lbm_get_env(), args[0], args[1]);
result = args[1];
}
} break;
case SYM_IX: