Re: Entry family

["Grein, Christoph" <christoph.grein@eurocopter.com>]

> ---------------------------------------------
> procedure Test_Index is
>    type Id is mod 10;
>    protected type Prot is
>       entry E (Boolean);
>    end Prot;
>    protected body Prot is
>        entry E (for I in Id) when True is
>        begin
>           null;
>        end;
>    end Prot;
>    P : Prot;
> begin
>    P.E(True);
> end;

To me, this looks like a fat compiler bug. The entry body shouod be

  entry E (for I in Boolean) when True is

Report it to ACT (report@gnat.com).