/* new perl context implementation frees savestack *before* restoring
* PL_curcop. Temporarily restore it prematurely to make gv_fetch*
* looks up unqualified var names in the caller's package */
#if SU_HAS_NEW_CXT
COP *old_cop = PL_curcop;
/* new perl context implementation frees savestack *before* restoring
* PL_curcop. Temporarily restore it prematurely to make gv_fetch*
* looks up unqualified var names in the caller's package */
#if SU_HAS_NEW_CXT
COP *old_cop = PL_curcop;