max/uclisp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add mapcar builtin, more tests, fixes

Browse Source
This commit is contained in:
Max Regan
2022-11-05 20:47:33 -04:00
parent f9ace289f1
commit 4da62ad2da
7 changed files with 144 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/special.c
View File

@@ -27,7 +27,7 @@ struct ucl_object *ucl_special_let(struct ucl_state *state, struct ucl_object *a
ucl_state_put(let_state, sym->symbol, value);
}
struct ucl_object *result = ucl_progn(state, expressions);
struct ucl_object *result = ucl_progn(let_state, expressions);
ucl_state_delete(let_state);
return result;
}
@@ -95,7 +95,7 @@ struct ucl_object *ucl_special_setq(struct ucl_state *state, struct ucl_object *
ucl_state_put(root_state, sym->symbol, value);
return sym;
return value;
}
struct ucl_object *ucl_special_progn(struct ucl_state *state, struct ucl_object *args) {