Relational Operators

[Gordon Cooke <gordon_cooke@hotmail.com>]

Is this code legal?

procedure Test is
   B : Boolean;
begin
   B := True = True = True;
end Test;


I thought this would be parsed as:

procedure Test is
   B : Boolean;
begin
   B := (True = True) = True;
end Test;


but GNAT 3.13p states:

     4.    B := True = True = True;
                            |
        >>> unexpected relational operator

 5 lines: 1 error


Gordon