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

2009-12-23 12:31 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbmath.h
    ! enable HB_MATH_ERRNO in all *unix builds not only in GCC ones

  * harbour/src/vm/itemapi.c
    ! use finite() to check for valid double values - looks that SunCC
      does not report iDODO warnings so we were not informed about the
      problem

  * harbour/include/hbdefs.h
  * harbour/src/common/hbprintf.c
    % use also _STDC_C99 macro not only _ISOC99_SOURCE to detect C99 mode
      and do not reduce such detection to GCC

   [TOMERGE 2.0]
This commit is contained in:
Przemyslaw Czerpak
2009-12-23 11:31:15 +00:00
parent 85861500e5
commit 541341709b
5 changed files with 23 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
harbour/ChangeLog
View File

@@ -17,6 +17,22 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-12-23 12:31 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbmath.h
! enable HB_MATH_ERRNO in all *unix builds not only in GCC ones
* harbour/src/vm/itemapi.c
! use finite() to check for valid double values - looks that SunCC
does not report iDODO warnings so we were not informed about the
problem
* harbour/include/hbdefs.h
* harbour/src/common/hbprintf.c
% use also _STDC_C99 macro not only _ISOC99_SOURCE to detect C99 mode
and do not reduce such detection to GCC
[TOMERGE 2.0]
2009-12-23 05:39 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/ChangeLog
* updated last entry

2
harbour/include/hbdefs.h
View File

@@ -74,7 +74,7 @@
( defined( __BORLANDC__ ) && __BORLANDC__ >= 1410 ) || \
( defined( __WATCOMC__ ) && __WATCOMC__ >= 1270 ) || \
( ( defined( __GNUC__ ) || defined( __SUNPRO_C ) || defined( __SUNPRO_CC ) ) && \
( defined( _ISOC99_SOURCE ) || \
( defined( _ISOC99_SOURCE ) || defined( _STDC_C99 ) || \
( defined( __STDC_VERSION__ ) && __STDC_VERSION__ >= 199901L ) || \
( defined( __DJGPP__ ) && \
( __DJGPP__ > 2 || ( __DJGPP__ == 2 && __DJGPP_MINOR__ >= 4 ) ) ) || \

3
harbour/include/hbmath.h
View File

@@ -103,7 +103,8 @@ HB_EXTERN_BEGIN
#define HUGE_VAL ( 1.0 / ( 1.0, 0.0 ) )
#endif
#if !defined( HB_MATH_HANDLER ) && defined( __GNUC__ ) /* && defined( HB_OS_UNIX ) */
#if !defined( HB_MATH_HANDLER ) && \
( defined( __GNUC__ ) || defined( HB_OS_UNIX ) )
#define HB_MATH_ERRNO
#endif

4
harbour/src/common/hbprintf.c
View File

@@ -174,7 +174,7 @@ optimized.
* platform then it can be replaced by 'value < 0' but in such case
* -0.0 will be shown as 0.0
*/
#if defined( __GNUC__ ) && defined( _ISOC99_SOURCE )
#if defined( _ISOC99_SOURCE ) || defined( _STDC_C99 )
/* use C99 macros */
# define hb_signbit( d ) signbit( d )
@@ -190,7 +190,7 @@ optimized.
#endif
#if defined( __GNUC__ ) && ( defined( _ISOC99_SOURCE ) || defined( __MINGW32__ ) )
#if defined( _ISOC99_SOURCE ) || defined( _STDC_C99 ) || defined( __MINGW32__ )
/* use C99 macros */
# define HB_NUMTYPE( v, d ) do { \

3
harbour/src/vm/itemapi.c
View File

@@ -2253,7 +2253,8 @@ BOOL hb_itemStrBuf( char *szResult, PHB_ITEM pNumber, int iSize, int iDec )
# define HB_FINITE_DBL(d) ( isfinite(d)!=0 )
#elif defined( __WATCOMC__ ) || defined( __BORLANDC__ ) || defined( _MSC_VER )
# define HB_FINITE_DBL(d) ( _finite(d)!=0 )
#elif defined( __GNUC__ ) || defined( __DJGPP__ ) || defined( __LCC__ )
#elif defined( __GNUC__ ) || defined( __DJGPP__ ) || defined( __LCC__ ) || \
defined( HB_OS_SUNOS )
# define HB_FINITE_DBL(d) ( finite(d)!=0 )
#else
int iTODO;