From d75cd52850ea56fd1184a2a05853a1bf73ded6ca Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Fri, 15 Dec 2017 13:51:13 -0500 Subject: [PATCH] Allow calling Cyc-get-cvar from eval --- runtime.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/runtime.c b/runtime.c index c2d379cb..a163cd87 100644 --- a/runtime.c +++ b/runtime.c @@ -4208,8 +4208,8 @@ void _symbol_127(void *data, object cont, object args) void _Cyc_91get_91cvar(void *data, object cont, object args) { - printf("not implemented\n"); - exit(1); + Cyc_check_num_args(data, "Cyc-get-cvar", 1, args); + return_closcall1(data, cont, Cyc_get_cvar((car(args)))); } void _Cyc_91set_91cvar_67(void *data, object cont, object args)