Sign in
gnu
/
gcc
/
cd2fd5facb5e1882d3f338ed456ae9536f7c0593
/
.
/
gcc
/
testsuite
/
gnat.dg
/
bit_packed_array6.adb
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
;