URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [gfortran.dg/] [enum_10.c] - Diff between revs 149 and 154

Rev 149	Rev 154
`/* This testcase is meant to be compiled together with enum_10.f90 */`	`/* This testcase is meant to be compiled together with enum_10.f90 */`

`extern void abort (void);`	`extern void abort (void);`

`typedef enum`	`typedef enum`
`{ MAX1 = 127 } onebyte;`	`{ MAX1 = 127 } onebyte;`

`void f1_ (onebyte i, int j)`	`void f1_ (onebyte i, int j)`
`{`	`{`
`if (i != j) abort ();`	`if (i != j) abort ();`
`}`	`}`

`typedef enum`	`typedef enum`
`{ MAX2 = 32767 } twobyte;`	`{ MAX2 = 32767 } twobyte;`

`void f2_ (twobyte i, int j)`	`void f2_ (twobyte i, int j)`
`{`	`{`
`if (i != j) abort ();`	`if (i != j) abort ();`
`}`	`}`

`typedef enum`	`typedef enum`
`{ MAX4 = 2000000 } fourbyte; /* don't need the precise value. */`	`{ MAX4 = 2000000 } fourbyte; /* don't need the precise value. */`

`void f4_ (fourbyte i, int j)`	`void f4_ (fourbyte i, int j)`
`{`	`{`
`if (i != j) abort ();`	`if (i != j) abort ();`
`}`	`}`