expander: avoid misinterpreting unforced module context
Use the simple-scope shortcut only when the module context is itself simple. Merge to v6.8
This commit is contained in:
parent
6bb4f2ecad
commit
aa9d5e5614
|
@ -12117,6 +12117,7 @@ void add_single_require(Scheme_Module_Exports *me, /* from module */
|
||||||
if (all_simple
|
if (all_simple
|
||||||
&& *all_simple
|
&& *all_simple
|
||||||
&& rn_stx
|
&& rn_stx
|
||||||
|
&& SCHEME_STXP(rn_stx)
|
||||||
&& !scheme_stx_equal_module_context(scope_src, rn_stx))
|
&& !scheme_stx_equal_module_context(scope_src, rn_stx))
|
||||||
*all_simple = 0;
|
*all_simple = 0;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user