blob: 84f7a4ba4a1eb0486d5f8d93c9ae41ee46e11bf8 [file] [log] [blame]
-- { dg-do run }
-- { dg-options "-O2 -gnata -gnatVa" }
with Bit_Packed_Array6_Pkg; use Bit_Packed_Array6_Pkg;
procedure Bit_Packed_Array6 is
B : constant Boolean := Everywhere (K_Configuration);
begin
null;
end;