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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,336232e570812d9b
X-Google-Attributes: gid103376,public
From: Matthew Heaney <matthew_heaney@acm.org>
Subject: Re: Stream_io / records with default discriminants
Date: 1999/02/14
Message-ID: <m3lni1b5i9.fsf@mheaney.ni.net>#1/1
X-Deja-AN: 444233690
Sender: matt@mheaney.ni.net
References: <uEax0A$V#GA.231@nih2naaf.prod2.compuserve.com>
NNTP-Posting-Date: Sun, 14 Feb 1999 03:13:07 PDT
Newsgroups: comp.lang.ada
Date: 1999-02-14T00:00:00+00:00
List-Id: <comp.lang.ada>

"Bernd Ragutt" <BerndRagutt@csi.com> writes:

> I have no problems writing and reading records without (!) default
> discriminants (using S'Output and S'Input).
> But when trying to read a record with (!) a default discriminant (using
> S'Output and S'Input), there is an exception.


You must post the smallest fragment of compilable code that illustrates
the behavior you observe.  Without code, we can only guess what is
going on.

Make sure that the object into which you are reading isn't constrained
in any way.  If the discriminant of the data in the stream doesn't match
the discriminant of your (constrained) object, then of course
Constraint_Error would occur.

But this is only a guess, because you haven't even told us which
exception you're getting.