diff --git a/ChangeLog.txt b/ChangeLog.txt
index 237655e983..8429aa663c 100644
--- a/ChangeLog.txt
+++ b/ChangeLog.txt
@@ -10,6 +10,11 @@
      * Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
  */
 
+
+2016-01-19 12:58 UTC+0100 Maurilio Longo (maurilio.longo@libero.it)
+  ! tests/longfile.prg
+    ! use hb_fSize() instead of FileSize()
+
 2016-01-19 11:47 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
   * src/compiler/cmdcheck.c
     ! fixed parsing some parameters taken from environment and
diff --git a/tests/longfile.prg b/tests/longfile.prg
index 6313a959ba..01d4b0330e 100644
--- a/tests/longfile.prg
+++ b/tests/longfile.prg
@@ -24,8 +24,8 @@ function main()
       long->FIELD1 := PadL( nRec, 30, Space( 1 ) )
    next
 
-   ? "File size is : " + Transform( FileSize( cFileName + ".dbf" ), "@ZE ###,###,###,###" )
-   ? "Index size is: " + Transform( FileSize( cFileName + IndexExt() ), "@ZE ###,###,###,###" )
+   ? "File size is : " + Transform( hb_fSize( cFileName + ".dbf" ), "@ZE ###,###,###,###" )
+   ? "Index size is: " + Transform( hb_fSize( cFileName + IndexExt() ), "@ZE ###,###,###,###" )
 
    ? "Testing index..."
    for nRec := 1 to nTotalRecs / 10