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

2009-04-29 19:27 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/compiler/genc.c
    ! respect \ escaping in C strings when #pragma dump C code is scanned
      for static Harbour functions
This commit is contained in:
Przemyslaw Czerpak
2009-04-29 17:19:47 +00:00
parent 03377b0961
commit f603cc5209
2 changed files with 13 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -18,6 +18,11 @@
past entries belonging to these authors: Viktor Szakats.
*/
2009-04-29 19:27 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/compiler/genc.c
! respect \ escaping in C strings when #pragma dump C code is scanned
for static Harbour functions
2009-04-29 15:57 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/ChangeLog
* corrected automatically added ChangeLog entry in my last commit

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

@@ -111,11 +111,17 @@ static void hb_compDumpFindCFunc( HB_COMP_DECL )
{
do { ++pszCCode; } while( *pszCCode && *pszCCode != '\n' );
}
else if( ch == '"' )
else if( ch == '"' || ch == '\'' )
{
while( *pszCCode )
{
if( *pszCCode++ == '"' )
if( *pszCCode == '\\' )
{
pszCCode++;
if( *pszCCode )
pszCCode++;
}
else if( *pszCCode++ == ch )
break;
}
}