pike.git / src / encode.c

version» Context lines:

pike.git/src/encode.c:2522:    res = (double)num;       EDB(2,fprintf(stderr, "Mantissa: %10g\n", res));       DECODE("float");       EDB(2,fprintf(stderr, "Exponent: %d\n", num));       if(!res)    { -  DECLARE_INF -  DECLARE_NAN -  +     switch(num)    {    case Pike_FP_SNAN: /* Signal Not A Number */    case Pike_FP_QNAN: /* Quiet Not A Number */    push_float((FLOAT_TYPE)MAKE_NAN());    break;       case Pike_FP_NINF: /* Negative infinity */ -  push_float((FLOAT_TYPE)MAKE_INF(-1)); +  push_float(-(FLOAT_TYPE)MAKE_INF());    break;       case Pike_FP_PINF: /* Positive infinity */ -  push_float((FLOAT_TYPE)MAKE_INF(1)); +  push_float((FLOAT_TYPE)MAKE_INF());    break;       case Pike_FP_NZERO: /* Negative Zero */    push_float(-0.0); /* Does this do what we want? */    break;       default:    push_float((FLOAT_TYPE)ldexp(res, num));    break;    }