[Emacs-diffs] Changes to emacs/src/w32.c [lexbind]

[Miles Bader]

Index: emacs/src/w32.c
diff -c emacs/src/w32.c:1.75.2.1 emacs/src/w32.c:1.75.2.2
*** emacs/src/w32.c:1.75.2.1    Fri Apr  4 01:21:03 2003
--- emacs/src/w32.c     Tue Oct 14 19:22:47 2003
***************
*** 3450,3460 ****
  
    if (rc == 0)
      {
!       flags = FILE_PIPE | FILE_READ | FILE_BINARY;
!       fd_info[phandles[0]].flags = flags;
  
!       flags = FILE_PIPE | FILE_WRITE | FILE_BINARY;
!       fd_info[phandles[1]].flags = flags;
      }
  
    return rc;
--- 3450,3471 ----
  
    if (rc == 0)
      {
!       /* Protect against overflow, since Windows can open more handles than
!        our fd_info array has room for.  */
!       if (phandles[0] >= MAXDESC || phandles[1] >= MAXDESC)
!       {
!         _close (phandles[0]);
!         _close (phandles[1]);
!         rc = -1;
!       }
!       else
!       {
!         flags = FILE_PIPE | FILE_READ | FILE_BINARY;
!         fd_info[phandles[0]].flags = flags;
  
!         flags = FILE_PIPE | FILE_WRITE | FILE_BINARY;
!         fd_info[phandles[1]].flags = flags;
!       }
      }
  
    return rc;
***************
*** 3955,3957 ****
--- 3966,3971 ----
  }
  
  /* end of nt.c */
+ 
+ /* arch-tag: 90442dd3-37be-482b-b272-ac752e3049f1
+    (do not change this comment) */