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=-2.9 required=5.0 tests=BAYES_00,MAILING_LIST_MULTI
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,6b1f8557c1f43dcd
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-03-19 20:13:35 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!proxad.net!blob.linuxfr.org!news.completel.fr!gitoyen!freenix!enst.fr!not-for-mail
From: "David C. Hoos, Sr." <david.c.hoos.sr@ada95.com>
Newsgroups: comp.lang.ada
Subject: Re: sequential io and variant records
Date: Wed, 19 Mar 2003 22:12:06 -0600
Organization: ENST, France
Message-ID: <mailman.2.1048133612.743.comp.lang.ada@ada.eu.org>
References: <6a90b886.0303191535.6c92aa0a@posting.google.com>
Reply-To: "comp.lang.ada mail to news gateway" <comp.lang.ada@ada.eu.org>
NNTP-Posting-Host: marvin.enst.fr
Mime-Version: 1.0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Trace: avanie.enst.fr 1048133614 17184 137.194.161.2 (20 Mar 2003 04:13:34
 GMT)
X-Complaints-To: usenet@enst.fr
NNTP-Posting-Date: Thu, 20 Mar 2003 04:13:34 +0000 (UTC)
To: "comp.lang.ada mail to news gateway" <comp.lang.ada@ada.eu.org>
Return-Path: <david.c.hoos.sr@ada95.com>
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
X-BeenThere: comp.lang.ada@ada.eu.org
X-Mailman-Version: 2.1
Precedence: list
List-Id: comp.lang.ada mail to news gateway <comp.lang.ada.ada.eu.org>
List-Unsubscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto:comp.lang.ada-request@ada.eu.org?subject=unsubscribe>
List-Post: <mailto:comp.lang.ada@ada.eu.org>
List-Help: <mailto:comp.lang.ada-request@ada.eu.org?subject=help>
List-Subscribe: <http://ada.eu.org/mailman/listinfo/comp.lang.ada>,
	<mailto:comp.lang.ada-request@ada.eu.org?subject=subscribe>
Xref: archiver1.google.com comp.lang.ada:35548
Date: 2003-03-19T22:12:06-06:00


----- Original Message ----- 
From: "Tony Gair" <tony_gair@yahoo.co.uk>
Newsgroups: comp.lang.ada
To: <comp.lang.ada@ada.eu.org>
Sent: March 19, 2003 5:35 PM
Subject: sequential io and variant records


> I was surprised to notice that I could compile and link the generic
> package sequential_io with a variant record as a parameter.
> 
> I was wondering if anyone has experimented to see how variant these
> records could be when used in conjunction with such a package.
> 
Sequential IO for variant records writes a number of storage units equal
to the number of storage units in the largest of the variants.

Since the discriminant is written as part of the record, when reading
back, the original variant is reconstructed, and any excess storage
units are ignored.

> Examples eagerly accepted.....
> _______________________________________________
> comp.lang.ada mailing list
> comp.lang.ada@ada.eu.org
> http://ada.eu.org/mailman/listinfo/comp.lang.ada
> 
>