ChangeLog 20000501-18:55 GMT+1

harbour/ChangeLog

@@ -1,3 +1,11 @@
+20000501-18:55 GMT+1 Ryszard Glab <rglab@imid.med.pl>
+
+   *source/rtl/filesys.c
+       * added support for hb_fsCommit() in Unix-like OS
+       
+   *source/compiler/harbour.c
+       * fixed signed/unsigned warnings
+
 20000501-18:48 GMT+1 Victor Szakats <info@szelvesz.hu>
 
    * include/hbpcode.h

harbour/source/compiler/harbour.c

@@ -2582,10 +2582,10 @@ static void hb_compOptimizeJumps( void )
    ULONG ulOptimized = 0;
    ULONG ulNextByte  = 0;
    int * piShifts;
-   int iNOOP;
+   ULONG iNOOP;
    ULONG ulOffset;
    ULONG ulBytes2Copy;
-   int iJump;
+   ULONG iJump;
    BOOL bForward = FALSE;
 
    /* Needed so the pasting of PCODE pieces below will work correctly  */

harbour/source/rtl/filesys.c

@@ -1026,8 +1026,19 @@ void    hb_fsCommit( FHANDLE hFileHandle )
    /* NOTE: close() functions releases all lock regardles if it is an
     * original or duplicated file handle
    */
-   s_uiErrorLast = FS_ERROR;
-   
+   #if defined(_POSIX_SYNCHRONIZED_IO)
+     /* faster - flushes data buffers only, without updating directory info 
+     */
+     if( fdatasync( hFileHandle ) < -1 )
+   #else
+     /* slower - flushes all file data buffers and i-node info 
+     */
+     if( fsync( hFileHandle ) < -1 )
+   #endif
+       s_uiErrorLast = FS_ERROR;	/* failure */
+   else
+       s_uiErrorLast = 0;
+       
 #else
 
    s_uiErrorLast = FS_ERROR;