fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-10-30 08:59 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* harbour/contrib/xhb/filestat.c
    ! fixed resource leak in FILESTATS() function caused by wrong close
      WIN API function. Problem reported by Robb - thanks.
This commit is contained in:
Przemyslaw Czerpak
2012-10-30 07:59:48 +00:00
parent b0f1409c0f
commit 5e196aadf2
2 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -16,6 +16,11 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-10-30 08:59 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* harbour/contrib/xhb/filestat.c
! fixed resource leak in FILESTATS() function caused by wrong close
WIN API function. Problem reported by Robb - thanks.
2012-10-25 00:08 UTC+0200 Viktor Szakats (harbour syenar.net)
* website/mailing.html
- deleted reference to 3rd mailing list

2
harbour/contrib/xhb/filestat.c
View File

@@ -205,7 +205,7 @@ HB_FUNC( FILESTATS )
hFind = FindFirstFile( lpFileName, &ffind );
if( hFind != INVALID_HANDLE_VALUE )
{
CloseHandle( hFind );
FindClose( hFind );
/* get file times and work them out */
llSize = ( HB_FOFFSET ) ffind.nFileSizeLow + ( ( HB_FOFFSET ) ffind.nFileSizeHigh << 32 );