From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.5-pre1 (2020-06-20) on ip-172-31-74-118.ec2.internal X-Spam-Level: X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00 autolearn=ham autolearn_force=no version=3.4.5-pre1 Path: eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!aioe.org!.POSTED.vgGlwuxQpjN0s/naYp4vQQ.user.gioia.aioe.org!not-for-mail From: Simon Wright Newsgroups: comp.lang.ada Subject: Re: Visibility issue Date: Wed, 16 Sep 2020 22:48:30 +0100 Organization: Aioe.org NNTP Server Message-ID: References: <27269975-58eb-407b-98ca-344bee6894d2n@googlegroups.com> <28481dfd-7127-4106-bcfd-f085ffbf228fn@googlegroups.com> <574318ce-0624-4893-8718-37f2e97736b7n@googlegroups.com> NNTP-Posting-Host: vgGlwuxQpjN0s/naYp4vQQ.user.gioia.aioe.org Mime-Version: 1.0 Content-Type: text/plain X-Complaints-To: abuse@aioe.org User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (darwin) X-Notice: Filtered by postfilter v. 0.9.2 Cancel-Lock: sha1:smdq4k57eRicuCxgRjfPmPy2moM= Xref: reader02.eternal-september.org comp.lang.ada:60174 List-Id: I still don't understand _why_. Purely from the visibility aspect, package API is function F return Integer; private Secret : constant := 42; end API; private package API.Impl is Altered : constant := Secret / 2; end API.Impl; with API.Impl; package body API is function F return Integer is (Impl.Altered); end API;