The outer ‘sub’ might actually be a format
print "ok 9 - closure var not available when outer sub is undefined\n";
}
+format start_subparse::assertion =
+@
+sub { }
+.
+# survived; no "print ok" necessary
+
# This is a variation of bug #22977, which crashes or fails an assertion
# up to 5.16.
# Keep this test last if you want test numbers to be sane.
const I32 oldsavestack_ix = PL_savestack_ix;
CV* const outsidecv = PL_compcv;
- if (PL_compcv) {
- assert(SvTYPE(PL_compcv) == SVt_PVCV);
- }
SAVEI32(PL_subline);
save_item(PL_subname);
SAVESPTR(PL_compcv);