Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
stack_usage3_pkg.ads
blob: e4a80c3ff71a2a5f2f213c6bda231cf9baaa24b5 [
file
] [
log
] [
blame
]
package
Stack_Usage3_Pkg
is
subtype
Small_String
is
String
(
1.
.
80
);
function
Diag
(
S
:
String
)
return
Small_String
;
end
Stack_Usage3_Pkg
;