diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index fc375998fd..4ce861683b 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2008-06-17 21:45 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
+   * source/rtl/gtclip.c
+     ! Added three LPWSTR casts to pacify warnings.
+       [TOMERGE RC1]
+
 2008-06-17 18:49 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
    * source/rtl/gtclip.c
      ! Fixed get/set clipboard when UNICODE is #defined.
diff --git a/harbour/source/rtl/gtclip.c b/harbour/source/rtl/gtclip.c
index 846e246637..aead764d2c 100644
--- a/harbour/source/rtl/gtclip.c
+++ b/harbour/source/rtl/gtclip.c
@@ -109,7 +109,7 @@ BOOL hb_gt_w32_setClipboard( UINT uFormat, char * szClipData, ULONG ulLen )
          {
             if( uFormat == CF_UNICODETEXT )
             {
-               hb_mbtowcset( lptstrCopy, szClipData, ulLen );
+               hb_mbtowcset( ( LPWSTR ) lptstrCopy, szClipData, ulLen );
                lptstrCopy[ ulLen * sizeof( wchar_t ) ] = L'\0';
             }
             else
@@ -143,9 +143,9 @@ BOOL hb_gt_w32_getClipboard( UINT uFormat, char ** pszClipData, ULONG *pulLen )
             switch( uFormat )
             {
             case CF_UNICODETEXT:
-               *pulLen = wcslen( lptstr );
+               *pulLen = wcslen( ( LPWSTR ) lptstr );
                if( *pulLen )
-                  *pszClipData = hb_wctomb( lptstr );
+                  *pszClipData = hb_wctomb( ( LPWSTR ) lptstr );
                break;
             case CF_OEMTEXT:
             case CF_TEXT: