add macro-debugger event on expand opaque expression

This commit is contained in:
Ryan Culpepper 2015-11-15 16:15:24 -05:00
parent d3f2bd6dac
commit 912f1fe603

View File

@ -4819,6 +4819,7 @@ compile_expand_expr(Scheme_Object *form, Scheme_Comp_Env *env,
form = scheme_stx_track(SCHEME_PTR1_VAL(var), form, NULL);
if (!rec[drec].comp) {
/* Already fully expanded. */
SCHEME_EXPAND_OBSERVE_OPAQUE_EXPR(env->observer, form);
return form;
}
} else {