Branch: Tag:

2015-10-14

2015-10-14 19:41:28 by Martin Nilsson <nilsson@fastmail.com>

Removed Intel IA64 compiler specific DO_NOT_WARN.

150: Inside #if defined(INT64)
     PMOD_EXPORT void push_int64 (INT64 i)   { -  if(i == DO_NOT_WARN((INT_TYPE)i)) +  if(i == (INT_TYPE)i)    { -  push_int(DO_NOT_WARN((INT_TYPE)i)); +  push_int((INT_TYPE)i);    }    else    {
202:   #elif INT64_BITS < GMP_NUMB_BITS    mp_limb_t val = mpz_getlimbn (mpz, 0) & GMP_NUMB_MASK;    if (val >= (mp_limb_t) 1 << INT64_BITS) goto overflow; -  res = DO_NOT_WARN ((INT64) val); +  res = (INT64) val;   #else    res = 0;    for (;; pos--) {
234:   PMOD_EXPORT void push_ulongest (unsigned LONGEST i)   {    if (i <= MAX_INT_TYPE) { -  push_int(DO_NOT_WARN((INT_TYPE)i)); +  push_int((INT_TYPE)i);    }    else {    MP_INT *mpz;
275:    res = mpz_getlimbn (mpz, 0) & GMP_NUMB_MASK;   #elif ULONGEST_BITS < GMP_NUMB_BITS    mp_limb_t val = mpz_getlimbn (mpz, 0) & GMP_NUMB_MASK; -  res = DO_NOT_WARN ((unsigned LONGEST) val); +  res = (unsigned LONGEST) val;    if (val != res) return 0;   #else    res = 0;
886:    if (!flag_left)    for(i = 0; i < (INT_TYPE)sizeof(mp_limb_t); i++)    { -  *(--dst) = DO_NOT_WARN((unsigned char)((neg ? ~x : x) & 0xff)); +  *(--dst) = (unsigned char)((neg ? ~x : x) & 0xff);    x >>= 8;    if(!--width)    break;
894:    else    for(i = 0; i < (INT_TYPE)sizeof(mp_limb_t); i++)    { -  *(dst++) = DO_NOT_WARN((unsigned char)((neg ? ~x : x) & 0xff)); +  *(dst++) = (unsigned char)((neg ? ~x : x) & 0xff);    x >>= 8;    if(!--width)    break;
960:    pop_n_elems(args);       if (base == 256 || base == -256) -  push_int(DO_NOT_WARN((INT32)((mpz_sizeinbase(THIS, 2) + 7) / 8))); +  push_int((INT32)((mpz_sizeinbase(THIS, 2) + 7) / 8));    else -  push_int(DO_NOT_WARN((INT32)(mpz_sizeinbase(THIS, base)))); +  push_int((INT32)(mpz_sizeinbase(THIS, base)));   }      /*! @decl string|int|float cast(string type)