blob: 601c2f201c8d462d35056e2f3067fc6e332d8e5b [file] [log] [blame]
package Opt17 is
subtype S is String (1 .. 5);
function Func return S;
end Opt17;