9 lines
131 B
Ada
9 lines
131 B
Ada
|
-- { dg-do compile }
|
||
|
|
||
|
procedure Slice_Enum is
|
||
|
Pos : array (Boolean) of Integer;
|
||
|
begin
|
||
|
Pos (Boolean) := (others => 0);
|
||
|
end;
|
||
|
|