diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 0e77e9b89c..8291c66096 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,12 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2010-06-22 17:00 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+  * src/macro/macro.yyc
+  * src/macro/macro.y
+    + Added cast (similar to the one found in compiler .y code)
+      to pacify long time msvc warning.
+
 2010-06-22 16:50 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * src/vm/dynsym.c
   * include/hbapi.h
diff --git a/harbour/src/macro/macro.y b/harbour/src/macro/macro.y
index e164476ba5..78721b3a8e 100644
--- a/harbour/src/macro/macro.y
+++ b/harbour/src/macro/macro.y
@@ -280,7 +280,7 @@ NumValue   : NUM_DOUBLE       { $$ = hb_compExprNewDouble( $1.dNumber, $1.bWidth
            | NUM_LONG         { $$ = hb_compExprNewLong( $1.lNumber, HB_COMP_PARAM ); }
            ;
 
-DateValue  : NUM_DATE         { $$ = hb_compExprNewDate( $1.lNumber, HB_COMP_PARAM ); }
+DateValue  : NUM_DATE         { $$ = hb_compExprNewDate( ( long ) $1.lNumber, HB_COMP_PARAM ); }
            ;
 
 TimeStampValue : TIMESTAMP    { $$ = hb_compExprNewTimeStamp( $1.date, $1.time, HB_COMP_PARAM ); }
diff --git a/harbour/src/macro/macro.yyc b/harbour/src/macro/macro.yyc
index 424166291d..afee9e5711 100644
--- a/harbour/src/macro/macro.yyc
+++ b/harbour/src/macro/macro.yyc
@@ -2116,7 +2116,7 @@ yyreduce:
 
   case 7:
 #line 283 "macro.y"
-    { (yyval.asExpr) = hb_compExprNewDate( (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); ;}
+    { (yyval.asExpr) = hb_compExprNewDate( ( long ) (yyvsp[(1) - (1)].valLong).lNumber, HB_COMP_PARAM ); ;}
     break;
 
   case 8:
@@ -3408,4 +3408,3 @@ int hb_macrolex( YYSTYPE *yylval_ptr, HB_MACRO_PTR pMacro )
 }
 
 #endif /* HB_MACRO_PPLEX */
-