From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id A94623858D33; Fri, 31 Mar 2023 20:44:31 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org A94623858D33 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1680295471; bh=5si6Jox//yOzXJoEGH3PWbQomlgRff/3PJ4NrxLK7ig=; h=From:To:Subject:Date:In-Reply-To:References:From; b=GR/qWb58xfN2ebv5sCjWg4MM5+ektzkZCciKpr97GmIwVC/GdrQvfYPbc7Hkc3WKb ntcCundP1SyA7R526pHYeGeYu4yFjd1ymtfyTb+Y6eCMWC2G/sl1DmyiKX34yk6kuC pekyeLF6QbasqWHWOzL1vJM0Vr556pnWKilV3Xf0= From: "anlauf at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/91196] Interface generated for proc with VALUE,OPTIONAL misses hidden is-present argument Date: Fri, 31 Mar 2023 20:44:31 +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: 10.0 X-Bugzilla-Keywords: X-Bugzilla-Severity: normal X-Bugzilla-Who: anlauf 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=3D91196 anlauf at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |anlauf at gcc dot gnu.org --- Comment #3 from anlauf at gcc dot gnu.org --- Should work in gcc-13 after the fixes for pr107441 and pr107444. I get: logical(kind=3D1) foo (void * x, integer(kind=3D4)[1] * y, integer(kind=3D4= ) * z, integer(kind=3D4) z2, logical(kind=3D1) .z2) and in the main: static logical(kind=3D1) foo (void *, integer(kind=3D4)[1] *, integer(kin= d=3D4) *, integer(kind=3D4), logical(kind=3D1)); Note the update on the ABI documentation. Tobias: can you please check?=