revert previous change
svn: r1366
This commit is contained in:
parent
a1c5bf9c4c
commit
2281249bcd
|
@ -1982,7 +1982,7 @@ Scheme_Object *scheme_check_accessible_in_module(Scheme_Env *env, Scheme_Object
|
||||||
|| (env->module->primitive)
|
|| (env->module->primitive)
|
||||||
/* For now[?], we're pretending that all definitions exists for
|
/* For now[?], we're pretending that all definitions exists for
|
||||||
non-0 local phase. */
|
non-0 local phase. */
|
||||||
|| (env->mod_phase != env->phase)) {
|
|| env->mod_phase) {
|
||||||
if (want_pos)
|
if (want_pos)
|
||||||
return scheme_make_integer(-1);
|
return scheme_make_integer(-1);
|
||||||
else
|
else
|
||||||
|
|
Loading…
Reference in New Issue
Block a user