Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
embeed our own fresh copy of Win32API::File
[simgrid.git] / tools / cmake / scripts / IPC / Run / Win32IO.pm
index 69afd8e..b4bf8c0 100644 (file)
@@ -63,7 +63,7 @@ BEGIN {
 }
 
 ## REMOVE OSFHandleOpen
-use Win32API::File qw(
+use IPC::Win32APIFile qw(
    GetOsFHandle
    OsFHandleOpenFd
    OsFHandleOpen
@@ -123,6 +123,9 @@ sub _cleanup {
     CloseHandle( $self->{TEMP_FILE_HANDLE} )
        if defined $self->{TEMP_FILE_HANDLE};
 
+    close( $self->{CHILD_HANDLE} )
+       if defined $self->{CHILD_HANDLE};
+
     $self->{$_} = undef for @cleanup_fields;
 }