pike.git / src / stralloc.c

version» Context lines:

pike.git/src/stralloc.c:19:      #include <errno.h>   #include <float.h>   #include <ctype.h>   #include <math.h>      #ifndef HUGE   #define HUGE HUGE_VAL   #endif /*!HUGE*/    - RCSID("$Id: stralloc.c,v 1.111 2000/12/01 20:36:41 grubba Exp $"); + RCSID("$Id: stralloc.c,v 1.112 2000/12/05 21:08:22 per Exp $");      #define BEGIN_HASH_SIZE 997   #define MAX_AVG_LINK_LENGTH 3      /* Experimental dynamic hash length */   #ifndef HASH_PREFIX   static unsigned int HASH_PREFIX=64;   static unsigned int need_more_hash_prefix=0;   #endif   
pike.git/src/stralloc.c:2340:    }       if(exponent < 0 && exponent >-100) /* make sure we don't underflow */    num /= pow(10.0, (double) -exponent);    else    num *= pow(10.0, (double) exponent);       return num * sign;       overflow: -  /* Return an overflow Pike_error. */ +  /* Return an overflow error. */    errno = ERANGE;    return HUGE * sign;       underflow: -  /* Return an underflow Pike_error. */ +  /* Return an underflow error. */    if (endptr != NULL)    *endptr = nptr;    errno = ERANGE;    return 0.0;       noconv:    /* There was no number. */    if (endptr != NULL)    *endptr = nptr;    return 0.0;