diff --git a/ChangeLog.txt b/ChangeLog.txt
index f9b602bd7f..c107b190a8 100644
--- a/ChangeLog.txt
+++ b/ChangeLog.txt
@@ -10,6 +10,10 @@
      * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
  */
 
+2013-09-20 15:30 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
+  * src/rtl/hbgtcore.c
+    ! added explicit casting to strchr() result
+
 2013-09-19 09:52 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
   * src/rtl/hbgtcore.c
     + added support for GT parameters passed in //GT<NAME>
diff --git a/src/rtl/hbgtcore.c b/src/rtl/hbgtcore.c
index 9bc478ad79..e69182a3cb 100644
--- a/src/rtl/hbgtcore.c
+++ b/src/rtl/hbgtcore.c
@@ -3879,8 +3879,8 @@ static HB_BOOL hb_gtTryInit( const char * szGtName, HB_BOOL fFree )
       {
          if( fFree )
          {
-            char * pszStr;
-            if( ( pszStr = strchr( szGtName, ':' ) ) != NULL )
+            char * pszStr = ( char * ) strchr( szGtName, ':' );
+            if( pszStr != NULL )
                * pszStr = '\0';
          }