aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/opt59_pkg.ads
blob: f5628be98630a420e1368185abf8dda7e7b0e7b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
package Opt59_Pkg is

  type Boolean_Vector is array (1 .. 8) of Boolean;

  function Get_BV1 return Boolean_Vector;

  function Get_BV2 return Boolean_Vector;

  procedure Test (B : Boolean);

end Opt59_Pkg;