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

19991005-00:13 GMT+1

Browse Source
This commit is contained in:
Viktor Szakats
1999-10-04 22:26:08 +00:00
parent 16d743fcec
commit cd409cb265
2 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
19991005-00:13 GMT+1 Victor Szel <info@szelvesz.hu>
* source/compiler/genc.c
! Cosmetic: Some double tabs changed to single ones.
19991004-22:34 GMT+1 Victor Szel <info@szelvesz.hu>
* tests/db_brows.prg
- READEXIT() removed since it's now part of the RTL.

10
harbour/source/compiler/genc.c
View File

@@ -71,9 +71,9 @@ void GenCCode( PHB_FNAME pFileName ) /* generates the C language output */
fflush( stdout );
}
/*
/*
* Harbour Compiler, Build 30 (1999.09.30)
* Generated C source code
* Generated C source code
*/
fprintf( yyc, "/*\n * Harbour Compiler, Build %i%s (%04d.%02d.%02d)\n",
@@ -624,7 +624,7 @@ void GenCCode( PHB_FNAME pFileName ) /* generates the C language output */
wVar = pFunc->pCode[ lPCodePos + 1 ] + pFunc->pCode[ lPCodePos + 2 ] * 256;
wFixPos = FixSymbolPos( wVar );
fprintf( yyc, "\t\tHB_P_POPVARIABLE, %i, %i,",
fprintf( yyc, "\tHB_P_POPVARIABLE, %i, %i,",
LOBYTE( wFixPos ),
HIBYTE( wFixPos ) );
if( _bComments ) fprintf( yyc, "\t/* %s */", GetSymbolOrd( wVar )->szName );
@@ -938,7 +938,7 @@ void GenCCode( PHB_FNAME pFileName ) /* generates the C language output */
wSym = pFunc->pCode[ lPCodePos + 1 ] +
pFunc->pCode[ lPCodePos + 2 ] * 256;
wFixPos = FixSymbolPos( wSym );
fprintf( yyc, "\t\tHB_P_PUSHSYM, %i, %i,",
fprintf( yyc, "\tHB_P_PUSHSYM, %i, %i,",
LOBYTE( wFixPos ),
HIBYTE( wFixPos ) );
if( _bComments ) fprintf( yyc, "\t/* %s */", GetSymbolOrd( wSym )->szName );
@@ -954,7 +954,7 @@ void GenCCode( PHB_FNAME pFileName ) /* generates the C language output */
wVar = pFunc->pCode[ lPCodePos + 1 ] +
pFunc->pCode[ lPCodePos + 2 ] * 256;
wFixPos = FixSymbolPos( wVar );
fprintf( yyc, "\t\tHB_P_PUSHVARIABLE, %i, %i,",
fprintf( yyc, "\tHB_P_PUSHVARIABLE, %i, %i,",
LOBYTE( wFixPos ),
HIBYTE( wFixPos ) );
if( _bComments ) fprintf( yyc, "\t/* %s */", GetSymbolOrd( wVar )->szName );