diff --git a/harbour/ChangeLog b/harbour/ChangeLog index c6a9e8770b..d2bd6e82b5 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,11 @@ The license applies to all entries newer than 2009-04-28. */ +2011-02-20 01:54 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * src/compiler/gencc.c + ! Fixed typos in 2011-02-15 13:39 UTC+0100 Przemyslaw Czerpak + breaking strlarge and strhidden VM ops. + 2011-02-19 20:49 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * package/harbour.spec * package/harbour-win.spec.in diff --git a/harbour/src/compiler/gencc.c b/harbour/src/compiler/gencc.c index 6f68304421..6112c02bcf 100644 --- a/harbour/src/compiler/gencc.c +++ b/harbour/src/compiler/gencc.c @@ -1413,7 +1413,7 @@ static HB_GENC_FUNC( hb_p_pushstrlarge ) HB_GENC_LABEL(); - hb_compGenCStrData( cargo->yyc, &pFunc->pCode[ nPCodePos + 3 ], nLen, -1 ); + hb_compGenCStrData( cargo->yyc, &pFunc->pCode[ nPCodePos + 4 ], nLen, -1 ); return 5 + nLen; } @@ -1424,7 +1424,7 @@ static HB_GENC_FUNC( hb_p_pushstrhidden ) HB_GENC_LABEL(); - hb_compGenCStrData( cargo->yyc, &pFunc->pCode[ nPCodePos + 3 ], nLen, + hb_compGenCStrData( cargo->yyc, &pFunc->pCode[ nPCodePos + 4 ], nLen, pFunc->pCode[ nPCodePos + 1 ] ); return 4 + nLen;