[svn:parrot] r37986 - trunk/src/io

[Infinoid at svn.parrot.org]

Author: Infinoid
Date: Wed Apr  8 23:44:07 2009
New Revision: 37986
URL: https://trac.parrot.org/parrot/changeset/37986

Log:
[win32] Make Parrot_io_init_win32 try to be a little more resistant to closed filehandles.  LylePerl++

Modified:
   trunk/src/io/win32.c

Modified: trunk/src/io/win32.c
==============================================================================
--- trunk/src/io/win32.c	Wed Apr  8 23:43:59 2009	(r37985)
+++ trunk/src/io/win32.c	Wed Apr  8 23:44:07 2009	(r37986)
@@ -142,19 +142,19 @@
         _PIO_STDIN(interp) = Parrot_io_fdopen_win32(interp, PMCNULL, h, PIO_F_READ);
     }
     else {
-        return -1;
+        _PIO_STDIN(interp) = PMCNULL;
     }
     if ((h = GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE) {
         _PIO_STDOUT(interp) = Parrot_io_fdopen_win32(interp, PMCNULL, h, PIO_F_WRITE);
     }
     else {
-        return -2;
+        _PIO_STDIN(interp) = PMCNULL;
     }
     if ((h = GetStdHandle(STD_ERROR_HANDLE)) != INVALID_HANDLE_VALUE) {
         _PIO_STDERR(interp) = Parrot_io_fdopen_win32(interp, PMCNULL, h, PIO_F_WRITE);
     }
     else {
-        return -3;
+        _PIO_STDIN(interp) = PMCNULL;
     }
 #  if PARROT_NET_DEVEL
     /* Start Winsock