Hack to restore Win32 pseudo fork broken by Multiple Interpreter

perlio.c change 10255.

p4raw-id: //depot/perlio@10346

1 files changed, 2 insertions, 0 deletions

diff --git a/perlio.c b/perlio.c
index f0728baac4..6dec0c6f77 100644
--- a/perlio.c
+++ b/perlio.c
@@ -3614,7 +3614,9 @@ void
 PerlIO_init(void)
 {
  dTHX;
+#ifndef WIN32
  call_atexit(PerlIO_cleanup_layers, NULL);
+#endif
  if (!_perlio)
   {
 #ifndef WIN32