Add primitive procedures to expression type

2025-08-10 14:37:40 +01:00
parent 3f871d2b43
commit 472a682757
5 changed files with 55 additions and 2 deletions
--- a/lib/eval.c
+++ b/lib/eval.c
@@ -10,6 +10,7 @@ void eval(am_t *am)
 	switch (am->expr->atom.type) {
 	case ATOM_TYPE_EMPTY_LIST:
 	case ATOM_TYPE_INTEGER:
+	case ATOM_TYPE_PRIM_PROC:
 		am->val = am->expr;
 		break;
 	case ATOM_TYPE_SYMBOL: