diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 22c847881a..ae784d855f 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,14 @@
    2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2007-10-27 17:50 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
+   * utils/hbpp/pragma.c
+   * source/rtl/binnum.c
+   * source/rtl/direct.c
+     ! Some VS2005 -O2 warnings.
+       One TOFIX added at the same time, since DIRECTORY()
+       has a problem returning file sizes greater than 2GB.
+
 2007-10-27 16:57 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
    * include/hbapifs.h
    * source/rtl/fserror.c
diff --git a/harbour/source/rtl/binnum.c b/harbour/source/rtl/binnum.c
index 38294a63b9..a621732061 100644
--- a/harbour/source/rtl/binnum.c
+++ b/harbour/source/rtl/binnum.c
@@ -114,10 +114,10 @@ HB_FUNC( L2BIN )
    {
       long lValue = hb_parnl( 1 );
 
-      szString[ 0 ] = ( lValue & 0x000000FF );
-      szString[ 1 ] = ( lValue & 0x0000FF00 ) >> 8;
-      szString[ 2 ] = ( lValue & 0x00FF0000 ) >> 16;
-      szString[ 3 ] = ( lValue & 0xFF000000 ) >> 24;
+      szString[ 0 ] = ( char ) ( lValue & 0x000000FF );
+      szString[ 1 ] = ( char ) ( ( lValue & 0x0000FF00 ) >> 8 );
+      szString[ 2 ] = ( char ) ( ( lValue & 0x00FF0000 ) >> 16 );
+      szString[ 3 ] = ( char ) ( ( lValue & 0xFF000000 ) >> 24 );
    }
    else
    {
@@ -129,4 +129,3 @@ HB_FUNC( L2BIN )
 
    hb_retclen( szString, 4 );
 }
-
diff --git a/harbour/source/rtl/direct.c b/harbour/source/rtl/direct.c
index 8daea21a8d..7c24027f65 100644
--- a/harbour/source/rtl/direct.c
+++ b/harbour/source/rtl/direct.c
@@ -157,7 +157,7 @@ HB_FUNC( DIRECTORY )
          char buffer[ 32 ];
 
          hb_arraySet( pSubarray, F_NAME, hb_itemPutC( pFilename, ffind->szName ) );
-         hb_arraySet( pSubarray, F_SIZE, hb_itemPutNL( pSize, ffind->size ) );
+         hb_arraySet( pSubarray, F_SIZE, hb_itemPutNL( pSize, ( LONG ) ffind->size ) ); /* TOFIX: Loss of digits. */
          hb_arraySet( pSubarray, F_DATE, hb_itemPutDL( pDate, ffind->lDate ) );
          hb_arraySet( pSubarray, F_TIME, hb_itemPutC( pTime, ffind->szTime ) );
          hb_arraySet( pSubarray, F_ATTR, hb_itemPutC( pAttr, hb_fsAttrDecode( ffind->attr, buffer ) ) );
@@ -180,4 +180,3 @@ HB_FUNC( DIRECTORY )
 
    hb_itemRelease( hb_itemReturn( pDir ) );
 }
-
diff --git a/harbour/utils/hbpp/pragma.c b/harbour/utils/hbpp/pragma.c
index 9c0baafb72..ff1e39ec83 100644
--- a/harbour/utils/hbpp/pragma.c
+++ b/harbour/utils/hbpp/pragma.c
@@ -342,11 +342,11 @@ BOOL hb_pp_ParsePragma( char * szLine )
          int iOverflow;
          int iMax;
          
-         iMax = hb_strValInt( szLine, &iOverflow );
+         iMax = ( int ) hb_strValInt( szLine, &iOverflow );
          if( iOverflow || iMax < 1 )
             hb_pp_MaxTranslateCycles = 1024;
          else
-            hb_pp_MaxTranslateCycles = (unsigned int)iMax;
+            hb_pp_MaxTranslateCycles = ( unsigned int ) iMax;
          DebugPragma( szLine, hb_pp_MaxTranslateCycles, FALSE );
       }
    }