URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gnat.dg/] [specs/] [private1-sub.ads] - Rev 696
Compare with Previous | Blame | View Log
-- { dg-do compile } -- { dg-options "-gnatct" } package Private1.Sub is package Nested is type T is limited private; function "=" (X, Y : T) return Boolean; private type T is new Private1.T; end Nested; end Private1.Sub;