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

2012-11-21 19:06 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* harbour/src/vm/cmdarg.c
    ! fixed GetModuleFileName() usage
This commit is contained in:
Przemyslaw Czerpak
2012-11-21 18:07:48 +00:00
parent 543eb4f760
commit 7c97a3ea8b
2 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -10,6 +10,10 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2012-11-21 19:06 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* harbour/src/vm/cmdarg.c
! fixed GetModuleFileName() usage
2012-11-21 17:50 UTC+0100 Viktor Szakats (harbour syenar.net)
* src/rdd/hsx/hsx.c
* src/rtl/gtxwc/gtxwc.c

14
harbour/src/vm/cmdarg.c
View File

@@ -99,13 +99,19 @@ void hb_winmainArgVBuild( void )
{
LPCTSTR lpCmdLine, lpSrc;
LPTSTR * lpArgV;
LPTSTR lpDst, lpArg;
LPTSTR lpDst, lpArg, lpModuleName;
HB_SIZE nSize, nModuleName;
int iArgC;
HB_BOOL fQuoted;
/* NOTE: MAX_PATH used intentionally instead of HB_MAX_PATH */
lpModuleName = ( LPTSTR ) HB_WINARG_ALLOC( ( MAX_PATH + 1 ) * sizeof( TCHAR ) );
nModuleName = GetModuleFileName( NULL, lpModuleName, MAX_PATH + 1 );
if( nModuleName )
nModuleName++;
HB_WINARG_FREE( lpModuleName );
lpCmdLine = GetCommandLine();
nModuleName = GetModuleFileName( NULL, NULL, 0 );
lpArgV = NULL;
lpDst = NULL;
nSize = 0;
@@ -254,7 +260,7 @@ void hb_winmainArgVFree( void )
{
if( s_argv == s_lpArgVStr )
s_argv = NULL;
HB_WINARG_FREE( ( void * ) s_lpArgVStr );
HB_WINARG_FREE( s_lpArgVStr );
s_lpArgVStr = NULL;
}
#else
@@ -262,7 +268,7 @@ void hb_winmainArgVFree( void )
s_argv = NULL;
#endif
HB_WINARG_FREE( ( void * ) s_lpArgV );
HB_WINARG_FREE( s_lpArgV );
s_lpArgV = NULL;
s_argc = 0;
}