Change 32235 by [EMAIL PROTECTED] on 2007/11/07 12:12:29
Disable debugging output in PerlIO_teardown;
it still relies on an interpreter being present.
Affected files ...
... //depot/perl/perlio.c#375 edit
Differences ...
==== //depot/perl/perlio.c#375 (text) ====
Index: perl/perlio.c
--- perl/perlio.c#374~32224~ 2007-11-05 05:58:52.000000000 -0800
+++ perl/perlio.c 2007-11-07 04:12:29.000000000 -0800
@@ -2416,6 +2416,12 @@
void PerlIO_teardown() /* Call only from PERL_SYS_TERM(). */
{
dVAR;
+#if 0
+/* XXX we can't rely on an interpreter being present at this late stage,
+ XXX so we can't use a function like PerlLIO_write that relies on one
+ being present (at least in win32) :-(.
+ Disable for now.
+*/
#ifdef DEBUGGING
{
/* By now all filehandles should have been closed, so any
@@ -2436,6 +2442,7 @@
}
}
#endif
+#endif
/* Not bothering with PL_perlio_mutex since by now
* all the interpreters are gone. */
if (PL_perlio_fd_refcnt_size /* Assuming initial size of zero. */
End of Patch.
