Sign in
gnu
/
gcc
/
a8404c07e7fca388c02c39077865f7d5fa928430
/
.
/
gcc
/
testsuite
/
gnat.dg
/
vect8.ads
blob: c926cd51ffa8c55c12754688c5dd89250780eef4 [
file
] [
log
] [
blame
]
package
Vect8
is
type
Vec
is
array
(
1
..
2
)
of
Long_Float
;
pragma
Machine_Attribute
(
Vec
,
"vector_type"
);
function
Foo
(
V
:
Vec
)
return
Vec
;
end
Vect8
;