Subversion Repositories openrisc

/* Test for binary integer constants: random errors.  */
 
/* Origin: Joerg Wunsch <j.gnu@uriah.heep.sax.de>.  */
/* { dg-do compile } */
/* { dg-options "-std=gnu99" } */
 
void
foo(void)
{
  double d;
  int i;
 
  d = 0b1101;
  d = 0b1101p1; /* { dg-error "invalid suffix \"p1\" on integer constant" } */
  d = 0x1101p1;
  i = 0b3011;   /* { dg-error "invalid suffix \"b3011\" on integer constant" } */
  i = 0b113;    /* { dg-error "invalid digit \"3\" in binary constant" } */
}