or download this
diff --git a/Coro-6.49/Coro/State.xs b/Coro-6.49/Coro/State.xs
index 6d631bd..c2cbe7b 100644
...
PUTBACK;
cb = hv_fetch ((HV *)SvRV (coro_current), "
+_trace_sub_cb", sizeof ("_trace_sub_cb") - 1, 0);
if (cb) call_sv (*cb, G_KEEPERR | G_EVAL |
+G_VOID | G_DISCARD);