diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 441c81d535..b80b5ac5f9 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+19990924-11:33 GMT+1 Victor Szel <info@szelvesz.hu>
+
+  * source/rtl/classes.c
+    ! hb_clsDictRealloc() one cast added.
+
 19990924-10:05 GMT+3 Alexander Kresin
   * source/hbpp/hbpp.c
     * Fixed bug, noted by Matteo Baccan
diff --git a/harbour/source/rtl/classes.c b/harbour/source/rtl/classes.c
index 0e119b9377..d5f8523292 100644
--- a/harbour/source/rtl/classes.c
+++ b/harbour/source/rtl/classes.c
@@ -142,7 +142,7 @@ static void hb_clsDictRealloc( PCLASS pClass )
 
       for( ui = 0; ui < ( pClass->uiHashKey * BUCKET ); ui++ )
       {
-         PHB_DYNS pMessage = pClass->pMethods[ ui ].pMessage;
+         PHB_DYNS pMessage = ( PHB_DYNS ) pClass->pMethods[ ui ].pMessage;
 
          if( pMessage )
          {