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

2000-06-26 20:11 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source 
* source/pp/ppcomp.c
     ! Fixed line number to ignore empty lines in #include files,when resuming parent file.
This commit is contained in:
Ron Pinkas
2000-06-27 03:17:31 +00:00
parent 81511f14d2
commit b76f7c9ef5
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 @@
2000-06-26 20:11 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
* source/pp/ppcomp.c
! Fixed line number to ignore empty lines in #include files,when resuming parent file.
2000-06-26 23:05 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
* source/pp/ppcore.c
*fixed some problems, appeared after last fix and

10
harbour/source/pp/ppcomp.c
View File

@@ -204,10 +204,6 @@ int hb_pp_Internal( FILE * handl_o, char * sOut )
if( hb_comp_files.iFiles == 2 )
{
}
/* Save line number for the last #include line
hb_comp_iIncLine = hb_comp_files.pLast->iLine - 1;
*/
/* Ron Pinkas end 2000-06-23 */
/* we close the currently include file and continue */
fclose( hb_comp_files.pLast->handle );
@@ -221,6 +217,10 @@ int hb_pp_Internal( FILE * handl_o, char * sOut )
hb_comp_iLine = hb_comp_files.pLast->iLine;
*/
/* Ron Pinkas added 2000-06-26 */
hb_pp_nEmptyStrings = 0;
/* Ron Pinkas end 2000-06-26 */
hb_comp_files.iFiles--;
lLine = 1;
}
@@ -236,7 +236,7 @@ int hb_pp_Internal( FILE * handl_o, char * sOut )
if( lLine )
{
sprintf( ptrOut, "#line %d \"%s\"", ( hb_comp_files.pLast->iLine + hb_pp_nEmptyStrings ) , hb_comp_files.pLast->szFileName );
sprintf( ptrOut, "#line %d \"%s\"", ( hb_comp_files.pLast->iLine ) , hb_comp_files.pLast->szFileName );
while( *ptrOut ) ptrOut++;
/* Ron Pinkas added 2000-06-14 */