no formatting happens for included case

[eddydebaere]

in example case below, formatting does not start:

myblock : block
constant c_tmp : t_list := (
first => 3,
next => 4
);
begin
end block;

When '(' is on the next line, then formatting is OK