From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugzilla@gcc.gnu.org>
Received: by sourceware.org (Postfix, from userid 48)
	id 956F83858C52; Sun, 17 Mar 2024 11:45:41 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 956F83858C52
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org;
	s=default; t=1710675941;
	bh=gsCgQQFllASL/s5QfiFQLmalgqZi0ic1SSd2OjkBLzQ=;
	h=From:To:Subject:Date:In-Reply-To:References:From;
	b=G96Xond3/stA/LBqMmJV4/zF43eMHJpa5I8CGeKl5PLGMzX1vzsatg0SJsc2eHsJV
	 KJaxjrgC4U8YyLhGfWd/Iohmv91+f19zyuSDEhP1RtyHx4trJuBQmlfVb5zas+N1Uk
	 vPQF2BcgDBD/WqAWrL8hMX5yr8Ul4kgx0msOZZlo=
From: "anujmohite001 at gmail dot com" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug fortran/80012] FIXME in diagnostic "%s procedure at %L is
 already declared as %s procedure" from symbol.c
Date: Sun, 17 Mar 2024 11:45:39 +0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: changed
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: gcc
X-Bugzilla-Component: fortran
X-Bugzilla-Version: 7.0
X-Bugzilla-Keywords: diagnostic, easyhack, FIXME
X-Bugzilla-Severity: trivial
X-Bugzilla-Who: anujmohite001 at gmail dot com
X-Bugzilla-Status: NEW
X-Bugzilla-Resolution: 
X-Bugzilla-Priority: P4
X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org
X-Bugzilla-Target-Milestone: ---
X-Bugzilla-Flags: 
X-Bugzilla-Changed-Fields: cc
Message-ID: <bug-80012-4-Jjkw7az5pD@http.gcc.gnu.org/bugzilla/>
In-Reply-To: <bug-80012-4@http.gcc.gnu.org/bugzilla/>
References: <bug-80012-4@http.gcc.gnu.org/bugzilla/>
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/
Auto-Submitted: auto-generated
MIME-Version: 1.0
List-Id: <gcc-bugs.sourceware.org>

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

Anuj Mohite <anujmohite001 at gmail dot com> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |anujmohite001 at gmail dot=
 com

--- Comment #4 from Anuj Mohite <anujmohite001 at gmail dot com> ---
can we split the original error message into two separate calls to gfc_erro=
r()
fuction. file: fortran/symbol.cc

Before changes:

gfc_error ("%s procedure at %L is already declared as %s "
           "procedure. \nF2008: A pointer function assignment "
           "is ambiguous if it is the first executable statement "
           "after the specification block. Please add any other "
           "kind of executable statement before it. FIXME",

After changes:

// Main error message
gfc_error ("%s procedure at %L is already declared as %s procedure",
           gfc_code2string(procedures, t), where,
           gfc_code2string(procedures, attr->proc));

// Additional information for F2008 standard
gfc_error("A pointer function assignment is ambiguous if it is the first "
           "executable statement after the specification block. Please add "
           "any other kind of executable statement before it.");=