OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [noncompile/] [20020207-1.c] - Rev 708

Go to most recent revision | Compare with Previous | Blame | View Log

/* This testcase ICEd because statement expression type was set, but was not
   as used.  */
 
struct A {
  unsigned int a, b, c;
};
 
extern void abort (void);
extern void exit (int);
 
struct A bar (void)
{
  return (struct A) { 176, 52, 31 };
}
 
void baz (struct A *a)
{
  if (a->a != 176 || a->b != 52 || a->c != 31)
    abort ();
}
 
int main ()
{
  struct A d;
 
  d = ({ { bar (); } });		/* { dg-error "void value" } */
  d = ({ if (1) { bar (); } });		/* { dg-error "void value" } */
  d = ({ while (0) { bar (); } });	/* { dg-error "void value" } */
  d = ({ do { bar (); } while (0); });	/* { dg-error "void value" } */
  baz (&d);
  exit (0);
}
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.