diff --git a/ChangeLog.txt b/ChangeLog.txt
index bbdb15ce23..ba5c1cdae7 100644
--- a/ChangeLog.txt
+++ b/ChangeLog.txt
@@ -1,5 +1,5 @@
 /*
- * $Id$
+ * $Id: bbdb15ce23480752ff235387e66d8cf0a7c2cb0c $
  */
 
 /* Read doc/howtorep.txt and use this format for entry headers:
@@ -10,6 +10,11 @@
      * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
  */
 
+2013-06-12 00:28 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
+  * contrib/gtwvg/wvgcore.c
+  * contrib/gtwvg/wvgcuig.c
+    ! Fixed to compile for 64 bits, reported by Maurizio, thanks.
+
 2013-06-11 20:26 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
   * include/hbpp.h
   * src/pp/ppcore.c
diff --git a/contrib/gtwvg/wvgcore.c b/contrib/gtwvg/wvgcore.c
index 26fec8a747..c31c83e394 100644
--- a/contrib/gtwvg/wvgcore.c
+++ b/contrib/gtwvg/wvgcore.c
@@ -1858,7 +1858,7 @@ HB_FUNC( WVT_DRAWPICTUREEX )
       iBottom = xy.y - 1 + hb_parvni( 6, 3 );
       iRight  = xy.x - 1 + hb_parvni( 6, 4 );
 
-      hb_retl( hb_wvt_gtRenderPicture( iLeft, iTop, iRight - iLeft + 1, iBottom - iTop + 1, ( IPicture * ) hb_parnl( 5 ), hb_parl( 7 ) ) );
+      hb_retl( hb_wvt_gtRenderPicture( iLeft, iTop, iRight - iLeft + 1, iBottom - iTop + 1, ( IPicture * ) ( HB_PTRDIFF ) hb_parnint( 5 ), hb_parl( 7 ) ) );
    }
 #endif
 }
diff --git a/contrib/gtwvg/wvgcuig.c b/contrib/gtwvg/wvgcuig.c
index d5e14ea588..6c2ce942ab 100644
--- a/contrib/gtwvg/wvgcuig.c
+++ b/contrib/gtwvg/wvgcuig.c
@@ -1305,7 +1305,7 @@ HB_FUNC( WVG_PICTUREEX )
       gObj->aOffset.iBottom = hb_parvni( 5, 3 );
       gObj->aOffset.iRight  = hb_parvni( 5, 4 );
 
-      gObj->iPicture        = ( IPicture * ) hb_parnl( 6 );
+      gObj->iPicture        = ( IPicture * ) ( HB_PTRDIFF ) hb_parnint( 6 );
       gObj->bDestroyPicture = HB_FALSE;
 
       gObj->gObjNext = pWVT->gObjs;