diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index f32d3afbb5..7c06b757f2 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19990824-15:30 EDT Paul Tucker <ptucker@sympatico.ca>
+  * source/rtl/filesys.c
+    * added a couple of casts.
+
 19990824-20:30 GMT+1 Victor Szel <info@szelvesz.hu>
 
   * include/hbdefs.h
@@ -10,7 +14,6 @@
         WITH PARAMETERS PASSED BY REFERENCE, PLEASE ALSO NOTE THAT
         FRead() IS NOT WORKING RIGHT NOW )
 
-  * source/rtl/filesys.c
     doc/subcodes.txt
     * Huge cleanup, reformatted, eliminated usage of internal structures, 
       fixed types, standardized variable names, explicit constants changed
diff --git a/harbour/source/rtl/filesys.c b/harbour/source/rtl/filesys.c
index 108d175555..aed8c58ded 100644
--- a/harbour/source/rtl/filesys.c
+++ b/harbour/source/rtl/filesys.c
@@ -727,7 +727,7 @@ HARBOUR HB_FREAD( void )
          /* NOTE: Warning, the read buffer will be directly modified ! */
 
          ulRead = hb_fsRead( hb_parni( 1 ),
-                             hb_parc( 2 ),
+                             (unsigned char *)hb_parc( 2 ),
                              ulToRead );
       }
    }
@@ -855,7 +855,7 @@ HARBOUR HB_FREADSTR( void )
          buffer[ ulRead ] = '\0';
 
          /* NOTE: This is valid, Clipper will not return Chr(0) from FREADSTR() */
-         hb_retc( buffer );
+         hb_retc( (char *)buffer );
 
          hb_xfree( buffer );
       }