diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index c37bbf3436..32c03284d6 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,10 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2010-10-13 21:52 UTC+0300 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt)
+  * harbour/src/rtl/gtstd/gtstd.c
+    * code cleanup to make some compilers happy
+
 2010-10-13 19:33 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * package/winuni/RELNOTES
     * pgsql version.
diff --git a/harbour/src/rtl/gtstd/gtstd.c b/harbour/src/rtl/gtstd/gtstd.c
index 91f6dbda64..f4eb02df1e 100644
--- a/harbour/src/rtl/gtstd/gtstd.c
+++ b/harbour/src/rtl/gtstd/gtstd.c
@@ -399,10 +399,7 @@ static int hb_gt_std_ReadKey( PHB_GT pGT, int iEventMask )
          {
             HB_BYTE bChar;
             if( hb_fsRead( pGTSTD->hStdin, &bChar, 1 ) == 1 )
-            {
                ch = pGTSTD->keyTransTbl[ bChar ];
-               exit;
-            }
          }
          else /* Remove from the input queue */
             ReadConsoleInput( ( HANDLE ) hb_fsGetOsHandle( pGTSTD->hStdin ), &ir, 1, &dwEvents );