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 E8F343858C60; Sat, 16 Sep 2023 11:02:04 +0000 (GMT)
DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org E8F343858C60
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org;
	s=default; t=1694862124;
	bh=GL52ahOSa2yBucUXOVrAI/isUpHi1RRpAteHlmNTOQw=;
	h=From:To:Subject:Date:From;
	b=Y0vvNMup83JxOh0Ir2i46dfQRqzw86R7/m4pTyvrW9OFzK9Cm0QaWAZ0eJuD90M3n
	 GGrSGfIMLop2BOL6/pGfQzrfnuLE4aVBrZN8LJDaxrsKaQAwlTazF1Zh35SdbKYuDO
	 yz4ZUUJD1ce1zhRynHIeBNL3t6eSj/l8BP27Qm+k=
From: "p.p11 at orange dot fr" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Subject: [Bug ada/111433] New: Erroneous message "error: null exclusion for
 "O" does not match"
Date: Sat, 16 Sep 2023 11:02:04 +0000
X-Bugzilla-Reason: CC
X-Bugzilla-Type: new
X-Bugzilla-Watch-Reason: None
X-Bugzilla-Product: gcc
X-Bugzilla-Component: ada
X-Bugzilla-Version: 13.1.0
X-Bugzilla-Keywords: 
X-Bugzilla-Severity: normal
X-Bugzilla-Who: p.p11 at orange dot fr
X-Bugzilla-Status: UNCONFIRMED
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: bug_id short_desc product version bug_status
 bug_severity priority component assigned_to reporter cc target_milestone
 attachments.created
Message-ID: <bug-111433-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=3D111433

            Bug ID: 111433
           Summary: Erroneous message "error: null exclusion for "O" does
                    not match"
           Product: gcc
           Version: 13.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: ada
          Assignee: unassigned at gcc dot gnu.org
          Reporter: p.p11 at orange dot fr
                CC: dkm at gcc dot gnu.org
  Target Milestone: ---

Created attachment 55908
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=3D55908&action=3Dedit
Archive of reproducer and full error message.

When compiling the procedure body, I got:
     8.    procedure Clear (O : access TJavaMeth) is
                     |
        >>> error: not fully conformant with declaration at objsrc.ads:25
        >>> error: null exclusion for "O" does not match
whereas procedure spec is:
    25.    procedure Clear (O : access TJavaMeth);

However, the declarations spec and body are identical.
What could be wrong?

I got this error when I add:
    20.    procedure Append (O : access TJavaClass; M : PJavaMeth);
and the incomplete type:
    14.    type TJavaMeth;
    15.    type PJavaMeth is access TJavaMeth;

HTH, Pascal.
See full source and full error message in attached zip.=