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.3 required=5.0 tests=BAYES_00,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,1116ece181be1aea
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-10-01 21:17:50 PST
Path: 
 archiver1.google.com!news2.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!small1.nntp.aus1.giganews.com!border1.nntp.aus1.giganews.com!intern1.nntp.aus1.giganews.com!nntp.giganews.com!nntp.gbronline.com!news.gbronline.com.POSTED!not-for-mail
NNTP-Posting-Date: Wed, 01 Oct 2003 23:17:48 -0500
Date: Wed, 01 Oct 2003 23:17:57 -0500
From: Wes Groleau <groleau@freeshell.org>
Reply-To: groleau@freeshell.org
Organization: Ain't no organization here!
User-Agent: Mozilla/5.0 (Macintosh; U; PPC Mac OS X Mach-O; en-US;
 rv:1.4) Gecko/20030624
X-Accept-Language: en-us, en, es-mx, pt-br, fr-ca
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Is the Writing on the Wall for Ada?
References: <NGs6b.10770$Pa1.519789@read1.cgocable.net>
 <vhieky4922o.fsf@niu.ifi.uio.no> <ud6dolepw.fsf@nasa.gov>
 <1064527575.648809@master.nyc.kbcfp.com> <3F739C1D.4030907@attbi.com>
 <uoex8i8i9.fsf@earthlink.net> <na5fnvcqjdvjbutt1s7hu9mhqadjk4jemb@4ax.com>
 <3F78E850.8010401@comcast.net>
 <slrnbniahu.g9.randhol+valid_for_reply_from_news@kiuk0152.chembio.ntnu.no>
 <3F797748.3000203@noplace.com> <834clb.uan1.ln@skymaster>
 <3F7AC5B0.9080108@noplace.com> <v3melb.u3k.ln@skymaster>
In-Reply-To: <v3melb.u3k.ln@skymaster>
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <8DSdnWrxBu9xO-aiU-KYhA@gbronline.com>
NNTP-Posting-Host: 69.9.86.102
X-Trace: 
 sv3-tFyI4hR9zngHjK+Ygyl2vMB9/QFAVSfWDIfSiJ2L462oCyZ7rC7sIg1Od7FCBEZRQ8zKPqRRauf3Pmr!gNF7QehRe53/JakWeBuNY/DX7m4KGYNaBasGmbfkB0M27MkwOrzeY9qDrWPrwc661cg/WXaGZQzh!+w==
X-Complaints-To: abuse@gbronline.com
X-DMCA-Complaints-To: abuse@gbronline.com
X-Abuse-and-DMCA-Info: Please be sure to forward a copy of ALL headers
X-Abuse-and-DMCA-Info: Otherwise we will be unable to process your complaint
 properly
X-Postfilter: 1.1
Xref: archiver1.google.com comp.lang.ada:94
Date: 2003-10-01T23:17:57-05:00
List-Id: <comp.lang.ada>

Jean-Pierre Rosen wrote:
> Of course, you could use types derived from strings. And keep the current length in
> an integer rather looking for a space, so you'll have to pack that into a record.
> While we're at it, it would be nice to have a discriminant to parameterize the
> maximum length... Well, at that point, you are just rewriting Bounded_Strings.
> (except for the discriminant in place of the generic parameter).

I generally set the maximum length by the declaration
of the index subtype, and used a value of that type
as the discriminant to set the actual length.

-- 
Wes Groleau
   ----
   The man who reads nothing at all is better educated
   than the man who reads nothing but newspapers.
                             -- Thomas Jefferson