Change 11708 by sky@sky-lab on 2001/08/17 13:34:04
Let perl_clone copy PL_exit_flags
Affected files ...
... //depot/perl/sv.c#456 edit
Differences ...
==== //depot/perl/sv.c#456 (text) ====
Index: perl/sv.c
--- perl/sv.c.~1~ Fri Aug 17 07:45:06 2001
+++ perl/sv.c Fri Aug 17 07:45:06 2001
@@ -9784,6 +9784,7 @@
PL_e_script = sv_dup_inc(proto_perl->Ie_script, param);
PL_perldb = proto_perl->Iperldb;
PL_perl_destruct_level = proto_perl->Iperl_destruct_level;
+ PL_exit_flags = proto_perl->Iexit_flags;
/* magical thingies */
/* XXX time(&PL_basetime) when asked for? */
End of Patch.
