diff --git a/harbour/ChangeLog b/harbour/ChangeLog index f28f9f9d85..102a4c5bac 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2008-12-31 13:59 UTC+0100 Foo Bar */ +2008-07-10 20:59 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/source/vm/macro.c + ! fixed RT error when invalid symbol string is precompiled + 2008-07-10 18:51 UTC+0100 Miguel Angel Marchuet * contrib/hbbmcdx/bmdbfcdx.c * contrib/hbbmcdx/hbbmcdx.h diff --git a/harbour/source/vm/macro.c b/harbour/source/vm/macro.c index b516a0ce8c..de951b58de 100644 --- a/harbour/source/vm/macro.c +++ b/harbour/source/vm/macro.c @@ -687,9 +687,10 @@ char * hb_macroTextSymbol( char *szString, ULONG ulLength, BOOL *pfNewString ) szResult[ ulLen ] = '\0'; } } - else if( szResult != szString ) + else { - hb_xfree( szResult ); + if( szResult != szString ) + hb_xfree( szResult ); szResult = NULL; } }