Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
g_tables.ads
blob: 34126882a5927933ae3d9c5ede0898afae7d630d [
file
] [
log
] [
blame
]
generic
type
Component
is
private
;
package
G_Tables
is
type
Table
(<>)
is
limited
private
;
function
Create
(
L
:
Natural
)
return
Table
;
private
type
Table
is
array
(
Positive
range
<>)
of
Component
;
end
G_Tables
;