Sign in
gnu
/
gcc
/
d769c5040874bf9546f2524f3f1d2a894165f92a
/
.
/
gcc
/
testsuite
/
gnat.dg
/
inline18_gen2.adb
blob: fe09fd0f395d4e148a367030593a220410bcee15 [
file
] [
log
] [
blame
]
package
body
Inline18_Gen2
is
function
Func
(
I
:
Interval_T
)
return
T
is
pragma
Unreferenced
(
I
);
Dummy
:
T
;
begin
return
Dummy
;
end
;
end
Inline18_Gen2
;