From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id 9A5943857020; Fri, 2 Jun 2023 08:10:13 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 9A5943857020 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1685693413; bh=rMjqxvo/oVt/4bAvLrzcPQHIvGOemfsel/GxP/9kG+Y=; h=From:To:Subject:Date:In-Reply-To:References:From; b=jIZzqcCEvRcoWslYfWtNdp+IM4qCSORcKdxdFlxhzEjuSybGRRTjN3EaDZ6+tPKx6 fvMdV91mFKQvX1BLAFM0pm5RQ11+GWoI9soqXFVj/YzX+OZ0W5zIk0XHY+vjra8y5e LMPeiGuulmTYoTzcfnXlUleP+X7xMVQp69K9MFFg= From: "pault at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/89645] No IMPLICIT type error with: ASSOCIATE( X => function() ) Date: Fri, 02 Jun 2023 08:10:13 +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: 9.0 X-Bugzilla-Keywords: rejects-valid X-Bugzilla-Severity: normal X-Bugzilla-Who: pault at gcc dot gnu.org X-Bugzilla-Status: NEW X-Bugzilla-Resolution: X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Flags: X-Bugzilla-Changed-Fields: cc Message-ID: In-Reply-To: References: 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: https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D89645 Paul Thomas changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |pault at gcc dot gnu.org --- Comment #2 from Paul Thomas --- Hi Ian, This is one of two PRs (cf. 99065) that expose a really nasty fault with gfortran parsing. If you interchange 's' and 'fun', you will find that the testcase compiles and runs. The fixup for intrinsic types works fine but, unfortunately, the derived ty= pe is need for parsing the associate block itself. I am girding my loins to fight the good fight. Thanks for this posting. Paul=