diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 2e1b68255e..2d4913edbb 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,13 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2012-05-16 18:38 UTC+0200 Viktor Szakats (harbour syenar.net)
+  * src/rtl/hbgtcore.c
+  * src/rtl/rat.c
+  * src/codepage/cp_utf8.c
+    % deleted unnecessary assignment generating warnings with
+      some compilers
+
 2012-05-16 18:28 UTC+0200 Viktor Szakats (harbour syenar.net)
   * src/vm/set.c
     ! added missing '#include "hbvm.h"' for hb_vmIsReady()
diff --git a/harbour/src/codepage/cp_utf8.c b/harbour/src/codepage/cp_utf8.c
index 3947cbc29b..883467a288 100644
--- a/harbour/src/codepage/cp_utf8.c
+++ b/harbour/src/codepage/cp_utf8.c
@@ -198,7 +198,6 @@ static HB_CDP_CMP_FUNC( UTF8_cmpi )
    HB_SIZE nPos1 = 0, nPos2 = 0;
    HB_WCHAR wc1, wc2;
 
-   iRet = 0;
    for( ;; )
    {
       if( !HB_CDPCHAR_GET( cdp, szSecond, nLenSecond, &nPos2, &wc2 ) )
diff --git a/harbour/src/rtl/hbgtcore.c b/harbour/src/rtl/hbgtcore.c
index 1e92f6e8b3..eac23814dd 100644
--- a/harbour/src/rtl/hbgtcore.c
+++ b/harbour/src/rtl/hbgtcore.c
@@ -1969,7 +1969,7 @@ static int hb_gt_def_Alert( PHB_GT pGT, PHB_ITEM pMessage, PHB_ITEM pOptions,
       PHB_CODEPAGE cdp = HB_GTSELF_HOSTCP( pGT );
       char szKey[ HB_MAX_CHAR_LEN ];
       HB_SIZE nChar;
-      int iKey = 0, i, iDspCount, iStyle, iRows, iCols,
+      int iKey, i, iDspCount, iStyle, iRows, iCols,
           iRow, iCol, iTop, iLeft, iBottom, iRight, iMnuCol, iPos, iClr;
       void * pBuffer = NULL;
       HB_GT_INFO gtInfo;
diff --git a/harbour/src/rtl/rat.c b/harbour/src/rtl/rat.c
index 2061807c10..cd37f6db93 100644
--- a/harbour/src/rtl/rat.c
+++ b/harbour/src/rtl/rat.c
@@ -106,7 +106,7 @@ HB_FUNC( HB_RAT )
          HB_ISIZ nFrom;
 
          if( nStart <= 1 )
-            nStart = nFrom = 0;
+            nFrom = 0;
          else if( HB_CDP_ISCHARIDX( cdp ) )
             nFrom = hb_cdpTextPos( cdp, pszText, nTo, --nStart );
          else