aboutsummaryrefslogtreecommitdiff
path: root/src/interp.c
diff options
context:
space:
mode:
authorMistivia <i@mistivia.com>2025-06-24 22:32:57 +0800
committerMistivia <i@mistivia.com>2025-06-24 22:34:19 +0800
commit44642d96eaef834b4bb846d27347ee681f9f5f7b (patch)
tree6e288498788115415650546f11a54a2a17766b15 /src/interp.c
parent7dd5aa6065c00ed2d85b191e7e3cd4b12467408d (diff)
add more list funcs
Diffstat (limited to 'src/interp.c')
-rw-r--r--src/interp.c11
1 files changed, 11 insertions, 0 deletions
diff --git a/src/interp.c b/src/interp.c
index 44800c8..6f2bb8a 100644
--- a/src/interp.c
+++ b/src/interp.c
@@ -157,6 +157,17 @@ void Interp_init(Interp *self) {
Interp_add_userfunc(self, "length", builtin_length);
Interp_add_userfunc(self, "nth", builtin_nth);
Interp_add_userfunc(self, "nthcdr", builtin_nthcdr);
+ Interp_add_userfunc(self, "list?", builtin_listp);
+ Interp_add_userfunc(self, "cons?", builtin_consp);
+ Interp_add_userfunc(self, "atom?", builtin_atomp);
+ Interp_add_userfunc(self, "null?", builtin_nullp);
+ Interp_add_userfunc(self, "member?", builtin_memberp);
+ Interp_add_userfunc(self, "number?", builtin_numberp);
+ Interp_add_userfunc(self, "integer?", builtin_integerp);
+ Interp_add_userfunc(self, "float?", builtin_floatp);
+ Interp_add_userfunc(self, "nreverse", builtin_nreverse);
+ Interp_add_userfunc(self, "reverse", builtin_reverse);
+ Interp_add_userfunc(self, "last", builtin_last);
Interp_add_userfunc(self, "_gcstat", builtin_gcstat);
Interp_add_userfunc(self, "_alwaysgc", builtin_alwaysgc);