Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
opt91_pkg.adb
blob: 5b95fb2e16536877c819e67653c69cc262095109 [
file
] [
log
] [
blame
]
package
body
Opt91_Pkg
is
package
body
Pure_Relation
is
overriding
function
Custom_Image
(
Self
:
Rel
)
return
String
is
begin
return
Custom_Image
(
Self
.
Rel
);
end
Custom_Image
;
end
Pure_Relation
;
end
Opt91_Pkg
;