diff options
| author | joye <joye> | 2014-01-13 21:26:09 (GMT) |
|---|---|---|
| committer | joye <joye> | 2014-01-13 21:26:09 (GMT) |
| commit | 07f16ca011f6a77ff9c20329c50b0610cbd3f6ef (patch) | |
| tree | 7f1c71ac7854b5cf76f22527597e59c12405d485 /src/bltVecMath.C | |
| parent | de6ef45a1a898fd1ec35fd6eff5ae00e62e39108 (diff) | |
| download | blt-07f16ca011f6a77ff9c20329c50b0610cbd3f6ef.zip blt-07f16ca011f6a77ff9c20329c50b0610cbd3f6ef.tar.gz blt-07f16ca011f6a77ff9c20329c50b0610cbd3f6ef.tar.bz2 | |
*** empty log message ***
Diffstat (limited to 'src/bltVecMath.C')
| -rw-r--r-- | src/bltVecMath.C | 19 |
1 files changed, 1 insertions, 18 deletions
diff --git a/src/bltVecMath.C b/src/bltVecMath.C index c210c29..80c9d1e 100644 --- a/src/bltVecMath.C +++ b/src/bltVecMath.C @@ -86,23 +86,6 @@ typedef struct { } MathFunction; - -/* - * Macros for testing floating-point values for certain special cases: - * - * IS_NAN Test for not-a-number by comparing a value against itself - * IF_INF Test for infinity by comparing against the largest floating - * point value. - */ - -#define IS_NAN(v) ((v) != (v)) - -#ifdef DBL_MAX -# define IS_INF(v) (((v) > DBL_MAX) || ((v) < -DBL_MAX)) -#else -# define IS_INF(v) 0 -#endif - /* The data structure below is used to describe an expression value, * which can be either a double-precision floating-point value, or a * string. A given number has only one value at a time. */ @@ -622,7 +605,7 @@ MathError( (char *)NULL); Tcl_SetErrorCode(interp, "ARITH", "DOMAIN", Tcl_GetStringResult(interp), (char *)NULL); - } else if ((errno == ERANGE) || IS_INF(value)) { + } else if ((errno == ERANGE) || isinf(value)) { if (value == 0.0) { Tcl_AppendResult(interp, "floating-point value too small to represent", |