55 lines
983 B
C
55 lines
983 B
C
/* { dg-do compile } */
|
|
/* { dg-options "-O -fdump-tree-optimized" } */
|
|
|
|
#define INT_BITS (sizeof (int) * __CHAR_BIT__)
|
|
#define ROL(x, y) ((x) << (y) | (x) >> (INT_BITS - (y)))
|
|
#define ROR(x, y) ((x) >> (y) | (x) << (INT_BITS - (y)))
|
|
|
|
unsigned
|
|
rol (unsigned a, unsigned b)
|
|
{
|
|
return ~ROL (~a, b);
|
|
}
|
|
|
|
unsigned int
|
|
ror (unsigned a, unsigned b)
|
|
{
|
|
return ~ROR (~a, b);
|
|
}
|
|
|
|
int
|
|
rol_conv1 (int a, unsigned b)
|
|
{
|
|
return ~(int)ROL((unsigned)~a, b);
|
|
}
|
|
|
|
int
|
|
rol_conv2 (int a, unsigned b)
|
|
{
|
|
return ~ROL((unsigned)~a, b);
|
|
}
|
|
|
|
int
|
|
rol_conv3 (unsigned a, unsigned b)
|
|
{
|
|
return ~(int)ROL(~a, b);
|
|
}
|
|
|
|
#define LONG_BITS (sizeof (long) * __CHAR_BIT__)
|
|
#define ROLL(x, y) ((x) << (y) | (x) >> (LONG_BITS - (y)))
|
|
#define RORL(x, y) ((x) >> (y) | (x) << (LONG_BITS - (y)))
|
|
|
|
unsigned long
|
|
roll (unsigned long a, unsigned long b)
|
|
{
|
|
return ~ROLL (~a, b);
|
|
}
|
|
|
|
unsigned long
|
|
rorl (unsigned long a, unsigned long b)
|
|
{
|
|
return ~RORL (~a, b);
|
|
}
|
|
|
|
/* { dg-final { scan-tree-dump-not "~" "optimized" } } */
|