comp.lang.ada
 help / color / mirror / Atom feed
From: kst@aonix.com (Keith Thompson)
Subject: Re: Ada 83 versions of Ada 95 packages
Date: 1996/12/26
Date: 1996-12-26T00:00:00+00:00	[thread overview]
Message-ID: <E30K1A.M3n@thomsoft.com> (raw)
In-Reply-To: 19961224155500.KAA09943@ladder01.news.aol.com


In <19961224155500.KAA09943@ladder01.news.aol.com> johnherro@aol.com writes:
[...]
> package Ada83_Strings_Unbounded is
>    type Unbounded_String(Length : Integer := 0) is private;
[...]
> private
>    type Unbounded_String(Length : Integer := 0) is
>       record
>          Text : String(1 .. Length);
>       end record;
> end Ada83_Strings_Unbounded;
[...]

Given this type declaration, with a default value for the discriminant,
an object of type Unbounded_String can occupy Integer'Last bytes (under
most compilers).

-- 
Keith Thompson (The_Other_Keith) kst@aonix.com <http://www.aonix.com> <*>
TeleSo^H^H^H^H^H^H Alsy^H^H^H^H Thomson Softw^H^H^H^H^H^H^H^H^H^H^H^H^H Aonix
10251 Vista Sorrento Parkway, Suite 300, San Diego, CA, USA, 92121-2706
"SPOON!" -- The Tick




      parent reply	other threads:[~1996-12-26  0:00 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-12-23  0:00 Ada 83 versions of Ada 95 packages W. Wesley Groleau (Wes)
1996-12-24  0:00 ` johnherro
1996-12-24  0:00   ` Robert Dewar
1996-12-24  0:00     ` johnherro
1996-12-24  0:00       ` Norman H. Cohen
1996-12-25  0:00         ` johnherro
1996-12-24  0:00       ` Robert Dewar
1996-12-26  0:00   ` Keith Thompson [this message]
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox