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

2010-06-22 04:48 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* src/common/expropt1.c
  * src/compiler/genc.c
  * src/compiler/gencc.c
  * include/hbexpra.c
    + Use HB_PFS format string for HB_SIZE values.

  * src/common/Makefile
    * Sorted.
This commit is contained in:
Viktor Szakats
2010-06-22 02:49:22 +00:00
parent 0cbaf318af
commit 00c92c1711
6 changed files with 21 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
harbour/ChangeLog
View File

@@ -16,6 +16,16 @@
The license applies to all entries newer than 2009-04-28.
*/
2010-06-22 04:48 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* src/common/expropt1.c
* src/compiler/genc.c
* src/compiler/gencc.c
* include/hbexpra.c
+ Use HB_PFS format string for HB_SIZE values.
* src/common/Makefile
* Sorted.
2010-06-22 04:35 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* include/hbhash.h
* src/common/hbhash.c

2
harbour/include/hbexpra.c
View File

@@ -630,7 +630,7 @@ HB_EXPR_PTR hb_compExprAssignStatic( HB_EXPR_PTR pLeftExpr, HB_EXPR_PTR pRightEx
HB_EXPR_PTR hb_compExprSetCodeblockBody( HB_EXPR_PTR pExpr, HB_BYTE * pCode, HB_SIZE ulLen )
{
HB_TRACE(HB_TR_DEBUG, ("hb_compExprSetCodeblockBody(%p,%p,%lu)", pExpr, pCode, ulLen));
HB_TRACE(HB_TR_DEBUG, ("hb_compExprSetCodeblockBody(%p,%p,%" HB_PFS "u)", pExpr, pCode, ulLen));
pExpr->value.asCodeblock.string = ( char * ) hb_xgrab( ulLen + 1 );
memcpy( pExpr->value.asCodeblock.string, pCode, ulLen );

10
harbour/src/common/Makefile
View File

@@ -8,21 +8,21 @@ C_SOURCES := \
expropt1.c \
expropt2.c \
funcid.c \
hbarch.c \
hbdate.c \
hbffind.c \
hbfopen.c \
hbfsapi.c \
hbgete.c \
hbwin.c \
hbwince.c \
hbhash.c \
hbmem.c \
hbprintf.c \
hbstr.c \
hbdate.c \
hbmem.c \
hbtrace.c \
hbver.c \
hbverdsp.c \
hbarch.c \
hbwin.c \
hbwince.c \
strwild.c \
LIBNAME := hbcommon

2
harbour/src/common/expropt1.c
View File

@@ -460,7 +460,7 @@ HB_EXPR_PTR hb_compExprNewCodeBlock( char *string, HB_SIZE ulLen, int iFlags, HB
{
HB_EXPR_PTR pExpr;
HB_TRACE(HB_TR_DEBUG, ("hb_compExprNewCodeBlock(%s,%lu,%d,%p)",string, ulLen, iFlags, HB_COMP_PARAM));
HB_TRACE(HB_TR_DEBUG, ("hb_compExprNewCodeBlock(%s,%" HB_PFS "u,%d,%p)",string, ulLen, iFlags, HB_COMP_PARAM));
pExpr = HB_COMP_EXPR_NEW( HB_ET_CODEBLOCK );

2
harbour/src/compiler/genc.c
View File

@@ -1749,7 +1749,7 @@ static HB_GENC_FUNC( hb_p_pushstrlarge )
pFunc->pCode[ lPCodePos + 3 ] );
if( cargo->bVerbose )
fprintf( cargo->yyc, "\t/* %lu */", ulLen );
fprintf( cargo->yyc, "\t/* %" HB_PFS "u */", ulLen );
if( ulLen > 0 )
{

6
harbour/src/compiler/gencc.c
View File

@@ -1096,7 +1096,7 @@ static HB_GENC_FUNC( hb_p_pushblocklarge )
ulSize = HB_PCODE_MKUINT24( &pFunc->pCode[ lPCodePos + 1 ] ) - 4;
lPCodePos += 4;
fprintf( cargo->yyc, "\t{\n\t\tstatic const HB_BYTE codeblock[ %lu ] = {", ulSize );
fprintf( cargo->yyc, "\t{\n\t\tstatic const HB_BYTE codeblock[ %" HB_PFS "u ] = {", ulSize );
for( ul = 0; ul < ulSize; ++ul )
{
@@ -1378,7 +1378,7 @@ static HB_GENC_FUNC( hb_p_pushstrlarge )
fprintf( cargo->yyc, "\thb_xvmPushStringConst( " );
hb_compGenCString( cargo->yyc, &pFunc->pCode[ lPCodePos + 4 ], ulLen );
fprintf( cargo->yyc, ", %lu );\n", ulLen );
fprintf( cargo->yyc, ", %" HB_PFS "u );\n", ulLen );
return 5 + ulLen;
}
@@ -1647,7 +1647,7 @@ static HB_GENC_FUNC( hb_p_threadstatics )
w = HB_PCODE_MKUSHORT( &pFunc->pCode[ lPCodePos + 1 ] );
ulSize = ( HB_SIZE ) w << 1;
fprintf( cargo->yyc, "\t{\n\t\tstatic const HB_BYTE statics[ %lu ] = {", ulSize );
fprintf( cargo->yyc, "\t{\n\t\tstatic const HB_BYTE statics[ %" HB_PFS "u ] = {", ulSize );
for( ul = 0; ul < ulSize; ++ul )
{