Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/gcc.dg/debug/pr41264-1.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* { dg-do compile } */ /* { dg-options "-Wno-attributes" } */ #if (__SIZEOF_INT__ <= 2) typedef unsigned long hashval_t; #else typedef unsigned int hashval_t; #endif static hashval_t __attribute__((always_inline)) iterative_hash_host_wide_int (long val, hashval_t val2) { hashval_t a = (hashval_t) val; int zero = 0; hashval_t b = (hashval_t) (val >> (sizeof (hashval_t) * 8 + zero)); a -= b; a -= val2; a ^= (val2>>13); b -= val2; b -= a; b ^= (a<< 8); val2 -= a; val2 -= b; val2 ^= ((b&0xffffffff)>>13); a -= b; a -= val2; a ^= ((val2&0xffffffff)>>12); b -= val2; b -= a; b = (b ^ (a<<16)) & 0xffffffff; val2 -= a; val2 -= b; val2 = (val2 ^ (b>> 5)) & 0xffffffff; a -= b; a -= val2; a = (a ^ (val2>> 3)) & 0xffffffff; b -= val2; b -= a; b = (b ^ (a<<10)) & 0xffffffff; val2 -= a; val2 -= b; val2 = (val2 ^ (b>>15)) & 0xffffffff; return val2; } hashval_t bla (int nunits, int mode) { hashval_t hashcode = 0; hashcode = iterative_hash_host_wide_int (14, hashcode); hashcode = iterative_hash_host_wide_int (nunits, hashcode); hashcode = iterative_hash_host_wide_int (mode, hashcode); if (nunits) return 0; else return hashcode; }