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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gdb-7.2/] [gdb-7.2-or32-1.0rc3/] [gdb/] [testsuite/] [gdb.ada/] [complete/] [pck.ads] - Diff between revs 330 and 513

Rev 330	Rev 513
`package Pck is`	`package Pck is`

`My_Global_Variable : Integer := 1;`	`My_Global_Variable : Integer := 1;`

`Exported_Capitalized : Integer := 2;`	`Exported_Capitalized : Integer := 2;`
`pragma Export (C, Exported_Capitalized, "Exported_Capitalized");`	`pragma Export (C, Exported_Capitalized, "Exported_Capitalized");`

`Local_Identical_One : Integer := 4;`	`Local_Identical_One : Integer := 4;`
`Local_Identical_Two : Integer := 8;`	`Local_Identical_Two : Integer := 8;`

`External_Identical_One : Integer := 19;`	`External_Identical_One : Integer := 19;`

`package Inner is`	`package Inner is`
`Inside_Variable : Integer := 3;`	`Inside_Variable : Integer := 3;`
`end Inner;`	`end Inner;`

`procedure Proc (I : Integer);`	`procedure Proc (I : Integer);`

`end Pck;`	`end Pck;`