1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
#if 0 # define TGSOURCE "exp2.c" #include "_tgmath.h" #include <math.h> TYPE TGFN(exp2)(TYPE x) { switch (fpclassify(x)) { case FP_ZERO: return 1.0; case FP_INFINITE: return signbit(x) ? 0.0 : x; default: break; } return x; } /* STDC(199901) LINK(m) */ #endif