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=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Received: by 2002:ac8:2b41:: with SMTP id 1mr17549999qtv.328.1572962556050;
        Tue, 05 Nov 2019 06:02:36 -0800 (PST)
X-Received: by 2002:aca:4891:: with SMTP id
 v139mr3904746oia.175.1572962555609;
 Tue, 05 Nov 2019 06:02:35 -0800 (PST)
Path: 
 eternal-september.org!reader01.eternal-september.org!feeder.eternal-september.org!news.gegeweb.eu!gegeweb.org!usenet-fr.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!j16no2364775qtl.0!news-out.google.com!g53ni761qtg.0!nntp.google.com!j16no2364769qtl.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Tue, 5 Nov 2019 06:02:35 -0800 (PST)
In-Reply-To: <27cb5366-4b3d-4f33-b8ec-2bc71c70780c@googlegroups.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=2607:fb90:68da:d334:38fe:400e:f0ee:771c;
 posting-account=3pYsyQoAAACcI-ym7XtMOI2PDU8gRZS5
NNTP-Posting-Host: 2607:fb90:68da:d334:38fe:400e:f0ee:771c
References: <fb36f04f-353e-4e35-bd19-eb72d2e78955@googlegroups.com>
 <21fa6db8-4b86-459f-bc5a-70993f92c28a@googlegroups.com>
 <27cb5366-4b3d-4f33-b8ec-2bc71c70780c@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <530a0f85-158a-4c42-b826-04ae4bd46451@googlegroups.com>
Subject: Re: How to best make a custom range?
From: Andrew Shvets <andrew.shvets@gmail.com>
Injection-Date: Tue, 05 Nov 2019 14:02:36 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
Xref: reader01.eternal-september.org comp.lang.ada:57484
Date: 2019-11-05T06:02:35-08:00
List-Id: <comp.lang.ada>

This is what I have now.

subtype DNA_Chars is Character range =E2=80=98A=E2=80=99 .. =E2=80=98Z=E2=
=80=99;
subtype DNA_Symbols is Character with Static_Predicate =3D> DNA_Symbols in =
=E2=80=98 =E2=80=98;
subtype DNA_Char is Character with Static_Predicate =3D> DNA_Char in DNA_Ch=
ars | DNA_Symbols;

And this is the warning that I get (one of many, but I can=E2=80=99t copy a=
nd paste):

warning: in instantiation at a-nudira.adb:54
type =E2=80=9CResult_Subtype=E2=80=9D has predicates, attribute =E2=80=9CFi=
rst=E2=80=9D not allowed