fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2011-04-23 10:38 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/src/rtl/filesys.c
    * casting to pacify warnings on some platforms which may use
      negative errno codes
This commit is contained in:
Przemyslaw Czerpak
2011-04-23 08:39:10 +00:00
parent 010313eff9
commit 189231e48e
2 changed files with 18 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -16,6 +16,11 @@
The license applies to all entries newer than 2009-04-28.
*/
2011-04-23 10:38 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/rtl/filesys.c
* casting to pacify warnings on some platforms which may use
negative errno codes
2011-04-23 00:40 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/gtwvg/wvgwing.c
! Converted: remaining C++ comments to Ansi C style.

26
harbour/src/rtl/filesys.c
View File

@@ -322,21 +322,21 @@
#if defined( HB_OS_UNIX ) && defined( EINTR )
# define HB_FAILURE_RETRY( ret, exp ) \
do \
{ \
( ret ) = ( exp ); \
hb_fsSetIOError( ( ret ) != -1, 0 ); \
} \
while( ( ret ) == -1 && hb_fsOsError() == EINTR && \
hb_vmRequestQuery() == 0 )
do \
{ \
( ret ) = ( exp ); \
hb_fsSetIOError( ( ret ) != -1, 0 ); \
} \
while( ( ret ) == -1 && hb_fsOsError() == ( HB_ERRCODE ) EINTR && \
hb_vmRequestQuery() == 0 )
#else
# define HB_FAILURE_RETRY( ret, exp ) \
do \
{ \
( ret ) = ( exp ); \
hb_fsSetIOError( ( ret ) != -1, 0 ); \
} \
while( 0 )
do \
{ \
( ret ) = ( exp ); \
hb_fsSetIOError( ( ret ) != -1, 0 ); \
} \
while( 0 )
#endif
static HB_BOOL s_fUseWaitLocks = HB_TRUE;