blob: 13517c7565a53c154d95fc6dfc41484e904baaa1 [file] [log] [blame]
-- RUN: %llvmgcc -S %s
procedure Array_Constructor is
A : array (Integer range <>) of Boolean := (True, False);
begin
null;
end;