https://gcc.gnu.org/bugzilla/show_bug.cgi?id=65751

            Bug ID: 65751
           Summary: Bogus &L in error message
           Product: gcc
           Version: 5.0
            Status: UNCONFIRMED
          Keywords: diagnostic
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: burnus at gcc dot gnu.org

Wrong since r194622.

I am not sure whether it should be backported or not; backporting kind of
breaks the translation work - but otherwise, it is trivial.

diff --git a/gcc/fortran/expr.c b/gcc/fortran/expr.c
index ab6f7a5..58e4cab 100644
--- a/gcc/fortran/expr.c
+++ b/gcc/fortran/expr.c
@@ -3632,7 +3632,7 @@ gfc_check_pointer_assign (gfc_expr *lvalue, gfc_expr
*rvalue)
               || (lvalue->ts.type == BT_DERIVED
                   && (lvalue->ts.u.derived->attr.is_bind_c
                       || lvalue->ts.u.derived->attr.sequence))))
-       gfc_error ("Data-pointer-object &L must be unlimited "
+       gfc_error ("Data-pointer-object must be unlimited "
                   "polymorphic, a sequence derived type or of a "
                   "type with the BIND attribute assignment at %L "
                   "to be compatible with an unlimited polymorphic "

Reply via email to