exit 0;
}
- plan(13);
+ plan(14);
}
use strict;
# tests in threads don't get counted, so
curr_test(curr_test() + 1);
+# This used to crash in 5.10.0 [perl #64954]
+
+undef *a;
+threads->new(sub {})->join;
+pass("undefing a typeglob doesn't cause a crash during cloning");
# EOF