Allow calling Cyc-get-cvar from eval

This commit is contained in:
Justin Ethier 2017-12-15 13:51:13 -05:00
parent f6d61f6451
commit d75cd52850

View file

@ -4208,8 +4208,8 @@ void _symbol_127(void *data, object cont, object args)
void _Cyc_91get_91cvar(void *data, object cont, object args) void _Cyc_91get_91cvar(void *data, object cont, object args)
{ {
printf("not implemented\n"); Cyc_check_num_args(data, "Cyc-get-cvar", 1, args);
exit(1); return_closcall1(data, cont, Cyc_get_cvar((car(args))));
} }
void _Cyc_91set_91cvar_67(void *data, object cont, object args) void _Cyc_91set_91cvar_67(void *data, object cont, object args)