From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.182.112.233 with SMTP id it9mr13998212obb.45.1447349476729;
        Thu, 12 Nov 2015 09:31:16 -0800 (PST)
X-Received: by 10.182.227.200 with SMTP id sc8mr160548obc.10.1447349476704;
 Thu, 12 Nov 2015 09:31:16 -0800 (PST)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!feeder.eternal-september.org!usenet.blueworldhosting.com!feeder01.blueworldhosting.com!peer03.iad.highwinds-media.com!news.highwinds-media.com!feed-me.highwinds-media.com!i2no2226811igv.0!news-out.google.com!l1ni2025igd.0!nntp.google.com!i2no2226808igv.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 12 Nov 2015 09:31:16 -0800 (PST)
In-Reply-To: <1a532527-f48c-4646-abb5-ec64b5e6106b@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=94.107.233.114;
 posting-account=6m7axgkAAADBKh082FfZLdYsJ24CXYi5
NNTP-Posting-Host: 94.107.233.114
References: <7ba56b33-28d4-42d2-8b9b-5ad9f5beab8b@googlegroups.com>
 <87io597447.fsf@theworld.com>
 <66278720-249a-4191-a908-bb840e7f3ccc@googlegroups.com>
 <faede672-7158-4c24-9647-8bd6f0cb5742@googlegroups.com>
 <n1vtm0$db7$1@dont-email.me>
 <d3958370-a3c5-4aac-9abf-bc9ddc873494@googlegroups.com>
 <6d874e75-e2c9-47e9-b394-f04052f10aa3@googlegroups.com>
 <cb164350-3ee0-4324-8d42-cfc66c2c4d5f@googlegroups.com>
 <1a532527-f48c-4646-abb5-ec64b5e6106b@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <2573827f-78e1-4554-a57e-11d3cb977c44@googlegroups.com>
Subject: Re: Bounded String question
From: Serge Robyns <serge.robyns@gmail.com>
Injection-Date: Thu, 12 Nov 2015 17:31:16 +0000
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
X-Received-Bytes: 2821
X-Received-Body-CRC: 1542996487
Xref: news.eternal-september.org comp.lang.ada:28320
Date: 2015-11-12T09:31:16-08:00
List-Id: <comp.lang.ada>

On Wednesday, 11 November 2015 21:40:35 UTC+1, AdaMagica  wrote:

> No complaint from GNAT GPL 2015:
> --------------------------------
>=20

> gprbuild -ws -c -f -u -PC:\Users\Grein\Documents\Christoph\Ada\Spielplatz=
\spielplatz.gpr -XGeneration=3DAda_2012 bs_test.adb
> gcc -c -gnato -g -fstack-check -gnata -gnatf -gnat12 bs_test.adb
> [2015-11-11 21:37:27] process terminated successfully, elapsed time: 02.0=
7s

I'm baffled.  I copied you code and indeed.  I added Put_Line just to make =
sure there is something in the body and to see the output :-P.

When applying this again on my package I get my previous errors.  I tried t=
o moved up my private declarations of the constants into the visible part, =
no relieve.  I moved the constant declaration right after the type declarat=
ion no solution neither.  The error message is very clear and I can't disag=
ree with them:
: non-static constant in preelaborated unit
: static expression must have scalar or string type (RM 4.9(2))

I've noticed that error messages can change because of other errors.  I had=
 that on certain occasions.  Maybe, as in some other cases, the compiler ju=
st missed to moan in your example but do actually fail with respect to the =
standards.