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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gnat.dg/] [array13.adb] - Diff between revs 304 and 384

Rev 304	Rev 384
`-- PR ada/38394`	`-- PR ada/38394`
`-- Reporter: Michael V�lske <michael.voelske@medien.uni-weimar.de>`	`-- Reporter: Michael V�lske <michael.voelske@medien.uni-weimar.de>`

`-- { dg-do assemble }`	`-- { dg-do assemble }`

`package body Array13 is`	`package body Array13 is`

`procedure Foo is`	`procedure Foo is`
`X, Y : T;`	`X, Y : T;`
`begin`	`begin`
`null;`	`null;`
`end;`	`end;`

`end Array13;`	`end Array13;`