From 11c4faee4655a05984fd314799a6151742fdc39c Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Tue, 22 Jun 2010 21:18:03 +0000 Subject: [PATCH] 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. --- harbour/ChangeLog | 4 ++++ harbour/src/macro/macrolex.c | 6 +++--- 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index a557cef440..d8b1576a82 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -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. diff --git a/harbour/src/macro/macrolex.c b/harbour/src/macro/macrolex.c index 32b0e2d15d..4aeee96cd7 100644 --- a/harbour/src/macro/macrolex.c +++ b/harbour/src/macro/macrolex.c @@ -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; }