From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on
	ip-172-31-65-14.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00,FREEMAIL_FROM,
	T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6
X-Received: by 2002:a05:620a:9d7:b0:71f:b8ba:ff43 with SMTP id y23-20020a05620a09d700b0071fb8baff43mr1420477qky.1.1677134077133;
        Wed, 22 Feb 2023 22:34:37 -0800 (PST)
X-Received: by 2002:a05:6870:2195:b0:16e:2bc7:7715 with SMTP id
 l21-20020a056870219500b0016e2bc77715mr1267276oae.223.1677134076880; Wed, 22
 Feb 2023 22:34:36 -0800 (PST)
Path: eternal-september.org!reader01.eternal-september.org!usenet.blueworldhosting.com!feed1.usenet.blueworldhosting.com!peer01.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Wed, 22 Feb 2023 22:34:36 -0800 (PST)
In-Reply-To: <ly7cw9lqs7.fsf@pushface.org>
Injection-Info: google-groups.googlegroups.com; posting-host=184.98.162.11; posting-account=x5rpZwoAAABMN2XPwcebPWPkebpwQNJG
NNTP-Posting-Host: 184.98.162.11
References: <365f84cf-29ae-4857-8dfe-e3bfa2191f9dn@googlegroups.com>
 <022bbc8b-8764-4562-900a-7143fabd394cn@googlegroups.com> <k5loupF7kt3U1@mid.individual.net>
 <f3a5d119-04b9-48d5-9e6e-ea548c7795a4n@googlegroups.com> <tt4nok$1fe4m$1@dont-email.me>
 <ly7cw9lqs7.fsf@pushface.org>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <eee74164-490d-4794-8d3d-d31d7ffe9f13n@googlegroups.com>
Subject: Re: Weird error emanating from GNAT binder: duplicat "gnatS"
From: Jerry <list_email@icloud.com>
Injection-Date: Thu, 23 Feb 2023 06:34:37 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1824
Xref: reader01.eternal-september.org comp.lang.ada:64962
List-Id: <comp.lang.ada>

I deleted lines from common.adb and common.ads piecemeal until I arrived at this MWE:

with Common;
procedure Test_gnatS_Problem is
begin
    null;
end Test_gnatS_Problem;

package body Common is
    procedure Dummy is
    begin
        null;
    end Dummy;
end Common;

with GNAT.OS_Lib; -- Error disappears when this line is removed.
package Common is
    procedure Dummy;
end Common;

Surely this is enough for someone to work with in fixing this problem.

Jerry