From: sk <noname@myob.com>
Subject: Re: Read booleans from streams
Date: Sun, 24 Mar 2002 20:05:42 -0600
Date: 2002-03-24T20:05:42-06:00 [thread overview]
Message-ID: <mailman.1017021903.20907.comp.lang.ada@ada.eu.org> (raw)
In-Reply-To: 200203242318.g2ONIkc12876@a77.ib.student.liu.se
Hi,
>raised ADA.IO_EXCEPTIONS.END_ERROR : s-stratt.adb:170
Your loop doesn't do an EOF test.
Your other issue ?
>data
>====
>02027203
Which looks like
0000_0000,0000_0010,0000_0000,0000_0010,
^ ^ ^ ^
0 0 0 0
0000_0111,0000_0010,0000_0000,0000_0011
^ ^ ^ ^
1 0 0 1
And your results look like
0 0 0 0 1 0 0 1
Interesting, I havn't checked it but how about
changing
"for Boolean_Aggregate'Component_Size use 1;"
to
"pragma Pack (Boolean_Aggregate);" and if
that doesn't work, try
"for Boolean_Aggregate'Component_Size use 1;"
"for Boolean_Aggregate'Size use 8";
if
"for Boolean_Aggregate'Size use 8";
doesn't work by itself.
--
-------------------------------------
-- Merge vertically for real address
-------------------------------------
s n p @ t . o
k i e k c c m
-------------------------------------
next parent reply other threads:[~2002-03-25 2:05 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <200203242318.g2ONIkc12876@a77.ib.student.liu.se>
2002-03-25 2:05 ` sk [this message]
[not found] ` <3C9E85F6.8EDF3AAD@myob.com>
2002-03-25 10:46 ` Read booleans from streams Erik Sigra
2002-03-24 23:18 Erik Sigra
2002-03-25 3:57 ` Eric G. Miller
2002-03-25 11:21 ` Erik Sigra
[not found] ` <200203251121.g2PBL9401018@a77.ib.student.liu.se>
2002-03-25 16:00 ` sk
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox