From 60f27a19aee04582339b312f1c3032009f5560de Mon Sep 17 00:00:00 2001 From: Felix Perktold Date: Mon, 22 Dec 2025 01:42:34 +0100 Subject: add eq?, make make_nil() function singleton --- main.c | 1 + 1 file changed, 1 insertion(+) (limited to 'main.c') diff --git a/main.c b/main.c index 2b0c00f..4f00b5d 100644 --- a/main.c +++ b/main.c @@ -32,6 +32,7 @@ int main(int argc, char **argv) { env_define(global_env, "car", make_builtin(builtin_car)); env_define(global_env, "cdr", make_builtin(builtin_cdr)); env_define(global_env, "null?", make_builtin(builtin_isnull)); + env_define(global_env, "eq?", make_builtin(builtin_eq)); env_define(global_env, "+", make_builtin(builtin_add)); env_define(global_env, "-", make_builtin(builtin_sub)); env_define(global_env, "*", make_builtin(builtin_mul)); -- cgit v1.2.3