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 autolearn=unavailable autolearn_force=no version=3.4.4 Path: eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!nntp-feed.chiark.greenend.org.uk!ewrotcd!newsfeed.xs3.de!io.xs3.de!news.jacob-sparre.dk!franka.jacob-sparre.dk!pnx.dk!.POSTED.109.57.170.242.mobile.3.dk!not-for-mail From: Jacob Sparre Andersen Newsgroups: comp.lang.ada Subject: Re: [Newbie] doubly constrained array, dumb question Date: Tue, 27 Feb 2018 08:38:54 +0100 Organization: JSA Research & Innovation Message-ID: <87y3jevq41.fsf@jacob-sparre.dk> References: <62f83fe5-15d6-41cf-952f-bc3cb077d42f@googlegroups.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Injection-Info: franka.jacob-sparre.dk; posting-host="109.57.170.242.mobile.3.dk:109.57.170.242"; logging-data="20625"; mail-complaints-to="news@jacob-sparre.dk" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/23.4 (gnu/linux) Cancel-Lock: sha1:zMLd1sUdHESG8Dg/XvDUdGECw2c= Xref: reader02.eternal-september.org comp.lang.ada:50676 Date: 2018-02-27T08:38:54+01:00 List-Id: Mehdi Saada <00120260a@gmail.com> writes: > I would like an constrained String subtype with narrower bounds that Positive'Range. > How can I do something like: > subtype Possible_Length is NATURAL range 1..80; > subtype T_Line is String (Possible_Length range <>); > ? I know "range <>" isn't included in the definition of "range_constraint". How can I express the same thing. > So that I can get after, a dynamic string with: > A: access T_LINE := new T_LINE'("BLABLABLA"); while checking for its range. You can do it with a dynamic predicate: subtype T_Line is String with Dynamic_Predicate => T_Line'Length in 1 .. 80; Greetings, Jacob -- CAUTION BLADE EXTREMELY SHARP KEEP OUT OF CHILDREN