[bugfix] funcall doesn't take a module to run

This commit is contained in:
Yuichi Nishiwaki 2014-09-15 15:51:31 +09:00
parent 0a0c085003
commit 0cc08c69f9
1 changed files with 1 additions and 1 deletions

2
var.c
View File

@ -18,7 +18,7 @@ var_lookup(pic_state *pic, pic_value var)
return pic_false_value(); return pic_false_value();
} }
env = pic_funcall(pic, "current-dynamic-environment", pic_nil_value()); env = pic_apply0(pic, pic_proc_ptr(val));
while (! pic_nil_p(env)) { while (! pic_nil_p(env)) {
pic_assert_type(pic, pic_car(pic, env), dict); pic_assert_type(pic, pic_car(pic, env), dict);