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

2010-06-22 23:17 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* src/macro/macrolex.c
    * Added casts to pacify long-time msvc warnings.
This commit is contained in:
Viktor Szakats
2010-06-22 21:18:03 +00:00
parent 8935689e6a
commit 11c4faee46
2 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -16,6 +16,10 @@
The license applies to all entries newer than 2009-04-28.
*/
2010-06-22 23:17 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* src/macro/macrolex.c
* Added casts to pacify long-time msvc warnings.
2010-06-22 20:03 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* src/rtl/gtwin/gtwin.c
- Deleted unused/unnecessary Windows type declarations.

6
harbour/src/macro/macrolex.c
View File

@@ -251,15 +251,15 @@ static int hb_lexNumConv( YYSTYPE *yylval_ptr, PHB_MACRO_LEX pLex, HB_SIZE ulLen
&lNumber, &dNumber, &iDec, &iWidth ) )
{
yylval_ptr->valDouble.dNumber = dNumber;
yylval_ptr->valDouble.bDec = iDec;
yylval_ptr->valDouble.bWidth = iWidth;
yylval_ptr->valDouble.bDec = ( HB_UCHAR ) iDec;
yylval_ptr->valDouble.bWidth = ( HB_UCHAR ) iWidth;
pLex->ulSrc += ulLen;
return NUM_DOUBLE;
}
else
{
yylval_ptr->valLong.lNumber = lNumber;
yylval_ptr->valLong.bWidth = iWidth;
yylval_ptr->valLong.bWidth = ( HB_UCHAR ) iWidth;
pLex->ulSrc += ulLen;
return NUM_LONG;
}