Return to pow10.c CVS log

Up to [gforth] / gforth

Annotation of gforth/pow10.c, revision 1.1

1.1     ! anton       1: #include <math.h>
        !             2: 
        !             3: #ifndef M_LN10
        !             4: #define M_LN10      2.30258509299404568402
        !             5: #endif
        !             6: 
        !             7: /* this should be defined by math.h; If it is not, the miranda
        !             8:    prototype would be wrong; Since we prefer compile-time errors to
        !             9:    run-time errors, it's declared here. */
        !            10: extern double exp(double);
        !            11: 
        !            12: double pow10(double x)
        !            13: {
        !            14:   return exp(x*M_LN10);
        !            15: }