[Bug ada/15601] New: Legal program rejected (use selected notation with operators)

["ludovic dot brenta at insalien dot org" <gcc-bugzilla at gcc dot gnu dot org>]

package P is
   type T1 is (black, red);
   package Q is
      type T2 is (green, red);
      x: T1;
      b: boolean := P."="(x,red);      -- OK
   end Q;
end P;

$ gnatmake p
gcc -c p.ads
p.ads:6:22: ""="" not declared in "P"
gnatmake: "p.ads" compilation error

-- 
           Summary: Legal program rejected (use selected notation with
                    operators)
           Product: gcc
           Version: 3.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: ada
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: ludovic dot brenta at insalien dot org
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i696-pc-linux-gnu
  GCC host triplet: i696-pc-linux-gnu
GCC target triplet: i696-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15601