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

2008-05-14 00:27 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/compiler/complex.c
    ! added casting to unsigned char to force syntax error when
      some unknown tokens appear. Negative values bison recognizes
      as end of input.

  * harbour/contrib/rddads/adsmgmnt.c
    ! cleaned one warning
This commit is contained in:
Przemyslaw Czerpak
2008-05-13 22:27:36 +00:00
parent 87e4a9277b
commit 01ac9cd6f1
3 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/ChangeLog
View File

@@ -8,6 +8,15 @@
2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2008-05-14 00:27 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/compiler/complex.c
! added casting to unsigned char to force syntax error when
some unknown tokens appear. Negative values bison recognizes
as end of input.
* harbour/contrib/rddads/adsmgmnt.c
! cleaned one warning
2008-05-13 11:32 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/contrib/xhb/txml.prg
! fixed wrongly defined scopes. Note: during porting xHarbour code

2
harbour/contrib/rddads/adsmgmnt.c
View File

@@ -278,7 +278,7 @@ HB_FUNC( ADSMGGETCOMMSTATS )
HB_FUNC( ADSMGRESETCOMMSTATS )
{
hb_retnl( s_hMgmtHandle ? AdsMgResetCommStats( s_hMgmtHandle ) : -1 );
hb_retnl( s_hMgmtHandle ? ( LONG ) AdsMgResetCommStats( s_hMgmtHandle ) : -1 );
}
HB_FUNC( ADSMGGETCONFIGINFO )

8
harbour/source/compiler/complex.c
View File

@@ -684,7 +684,7 @@ int hb_complex( YYSTYPE *yylval_ptr, HB_COMP_DECL )
return IDENTIFIER;
}
pLex->iState = OPERATOR;
return pToken->value[ 0 ];
return ( UCHAR ) pToken->value[ 0 ];
case HB_PP_TOKEN_EQ:
if( HB_SUPPORT_HARBOUR && pToken->pNext && pToken->pNext->spaces == 0 &&
@@ -709,13 +709,13 @@ int hb_complex( YYSTYPE *yylval_ptr, HB_COMP_DECL )
case HB_PP_TOKEN_GT:
case HB_PP_TOKEN_REFERENCE:
pLex->iState = OPERATOR;
return pToken->value[ 0 ];
return ( UCHAR ) pToken->value[ 0 ];
case HB_PP_TOKEN_EOL:
pLex->fEol = TRUE;
case HB_PP_TOKEN_EOC:
pLex->iState = LOOKUP;
return pToken->value[ 0 ];
return ( UCHAR ) pToken->value[ 0 ];
case HB_PP_TOKEN_KEYWORD:
{
@@ -1311,7 +1311,7 @@ int hb_complex( YYSTYPE *yylval_ptr, HB_COMP_DECL )
return iType;
}
default:
return pToken->value[ 0 ];
return ( UCHAR ) pToken->value[ 0 ];
}
}