blob: 4f786c2de3fc31e0231984a1685a841a72771cb5 [file] [log] [blame]
package body Inline18_Gen3 is
package body Inner_G is
function Next (Position : Index_T) return Index_T is
begin
return Position;
end;
end Inner_G;
end Inline18_Gen3;