Update error message.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@131087 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/gnat.dg/specs/variant_part.ads b/gcc/testsuite/gnat.dg/specs/variant_part.ads
index b7ac16c..afc92cd 100644 (file)
--- a/gcc/testsuite/gnat.dg/specs/variant_part.ads
+++ b/gcc/testsuite/gnat.dg/specs/variant_part.ads
@@ -1,7 +1,7 @@
 -- { dg-do compile }
 package Variant_Part is
    type T1(b: boolean) is record
-     case (b) is              -- { dg-error "discriminant name expected" }
+     case (b) is    -- { dg-error "discriminant name may not be parenthesized" }
         when others => null;
      end case;
    end record;