INN commit: branches/2.4/lib (perl.c)
INN Commit
Russ_Allbery at isc.org
Sun Jul 20 10:27:24 UTC 2008
Date: Sunday, July 20, 2008 @ 03:27:24
Author: iulius
Revision: 7938
Use PERL_EXIT_DESTRUCT_END as specified in the perlembed man page.
Indeed, it has otherwise been causing problems for applications that never
call perl_run since perl 5.7.2.
This flag enables the running of END blocks if the perl_parse fails;
perl_destruct will return the exit value.
Modified:
branches/2.4/lib/perl.c
--------+
perl.c | 3 +++
1 file changed, 3 insertions(+)
Modified: perl.c
===================================================================
--- perl.c 2008-07-20 10:27:20 UTC (rev 7937)
+++ perl.c 2008-07-20 10:27:24 UTC (rev 7938)
@@ -117,6 +117,9 @@
#endif
PerlCode = perl_alloc();
perl_construct(PerlCode);
+#ifdef PERL_EXIT_DESTRUCT_END
+ PL_exit_flags |= PERL_EXIT_DESTRUCT_END;
+#endif
perl_parse(PerlCode, xs_init, argc, (char **)argv, env) ;
}
More information about the inn-committers
mailing list