diff --git a/harbour/contrib/dot/pp_harb.ch b/harbour/contrib/dot/pp_harb.ch index e9b0af86f2..12015087cf 100644 --- a/harbour/contrib/dot/pp_harb.ch +++ b/harbour/contrib/dot/pp_harb.ch @@ -595,7 +595,7 @@ static HB_FUNC( NEXTIDENTIFIER ) } } -#pragma STOPDUMP +#pragma ENDDUMP //----------------------------------------------------------------------------// #ifdef WIN @@ -609,7 +609,7 @@ static HB_FUNC( NEXTIDENTIFIER ) hb_retni( MessageBox( ( HWND ) hb_parnl( 1 ), hb_parc( 2 ), hb_parc( 3 ), hb_parni( 4 ) ) ); } - #pragma STOPDUMP + #pragma ENDDUMP #endif @@ -1527,4 +1527,4 @@ STATIC FUNCTION InitFWResults() RETURN .T. -//--------------------------------------------------------------// +//--------------------------------------------------------------// \ No newline at end of file diff --git a/harbour/source/pp/pragma.c b/harbour/source/pp/pragma.c index b472d4f72c..f9ea38f4e9 100644 --- a/harbour/source/pp/pragma.c +++ b/harbour/source/pp/pragma.c @@ -239,8 +239,8 @@ void hb_pp_ParsePragma( char * szLine ) { pBuffer++; } - hb_strupr( strncpy( sDirective, pBuffer, 8 ) ); - if( memcmp( sDirective, "STOPDUMP", 8 ) == 0 ) + hb_strupr( strncpy( sDirective, pBuffer, 7 ) ); + if( memcmp( sDirective, "ENDDUMP", 7 ) == 0 ) { hb_pp_bInline = FALSE; return; @@ -389,4 +389,3 @@ static void DebugPragma( char * pszStr, int iValue, BOOL bValue ) printf( "#pragma set to %s \'%s\'\n", bValue ? "ON" : "OFF", pszStr ); } } - diff --git a/harbour/tests/inline_c.prg b/harbour/tests/inline_c.prg index 89bbb0646d..4753e164bb 100644 --- a/harbour/tests/inline_c.prg +++ b/harbour/tests/inline_c.prg @@ -85,7 +85,7 @@ HB_FUNC( C_FUNC ) { hb_retc( "returned from C_FUN\n" ); } -#pragma STOPDUMP +#pragma ENDDUMP Function PostDumpTest() -RETURN "Post Dump Test" +RETURN "Post Dump Test" \ No newline at end of file