blob: 54e569302bc59201838018b53beb37f4af061096 [file] [log] [blame]
generic
type Bound_T is private;
package Inline18_Gen1 is
type T is private;
function Complete return T with Inline_Always;
private
type T is array (0 .. 1) of Bound_T;
end Inline18_Gen1;