From: tmoran@acm.org
Subject: How to use gnatelim in Gnat 3.14p?
Date: Mon, 11 Feb 2002 00:10:09 GMT
Date: 2002-02-11T00:10:09+00:00 [thread overview]
Message-ID: <BZD98.742$Wp3.369659067@newssvr14.news.prodigy.com> (raw)
In-Reply-To: Xns90C86B56DE86charleshixsonearthli@207.217.77.23
When I follow the gnat_ug.htm instructions to generate tree files for
gnatelim, the compiler complains about things that didn't bother it before.
gnatmake etest
works fine, but
gnatmke -f -c -gnatc -gnatt etest
results in:
gcc -c -gnatc -gnatt etest.adb
etest.adb:22:17: size for "Copy_Type" too small
etest.adb:24:09: instantiation error at a-unccon.ads:20
etest.adb:24:09: size for "Target" too small
etest.adb:27:03: warning: "dummys" is never assigned a value
gnatmake: "etest.adb" compilation error
This is on a file etest.adb:
with ada.streams;
with ada.unchecked_conversion;
procedure etest is
type Color_Intensities is range 0 .. 255;
for Color_Intensities'size use 8;
type DIB_Color_Type is record
Blue,
Green,
Red : Color_Intensities;
Reserved : Integer range 0 .. 0 := 0;
end record;
for DIB_Color_Type'size use 32;
for DIB_Color_Type use record
Blue at 0 range 0 .. 7;
Green at 1 range 0 .. 7;
Red at 2 range 0 .. 7;
Reserved at 3 range 0 .. 7;
end record;
subtype Copy_Type is Ada.Streams.Stream_Element_Array
(1 .. Ada.Streams.Stream_Element_Count(DIB_Color_Type'size/8));
function Copy_Of is new Ada.Unchecked_Conversion
(DIB_Color_Type, Copy_Type);
dummys : DIB_Color_Type;
dummyt : Copy_Type;
begin
dummyt := copy_of(dummys);
end etest;
What's the trick to using gnatelim?
next prev parent reply other threads:[~2002-02-11 0:10 UTC|newest]
Thread overview: 54+ messages / expand[flat|nested] mbox.gz Atom feed top
2001-06-19 20:39 Looping over a tagged record? M R Goodwin
2001-06-19 21:31 ` Pascal Obry
2001-06-19 21:32 ` Pascal Obry
2001-06-19 22:20 ` Samuel T. Harris
2001-06-19 23:45 ` mgoodwinSPAMMY
2001-06-20 1:33 ` Pat Rogers
2001-06-20 3:13 ` Pat Rogers
2001-06-20 2:58 ` DuckE
2001-06-20 13:15 ` Ted Dennison
2001-06-20 15:01 ` M. A. Alves
2001-06-21 2:36 ` DuckE
2001-06-21 10:14 ` M. A. Alves
2001-06-21 13:24 ` Pat Rogers
2001-06-21 17:08 ` Charles Hixson
2001-06-21 18:58 ` tmoran
2001-06-21 23:02 ` Charles Hixson
2001-06-22 19:04 ` B.Gaffney
2001-06-22 20:36 ` Pascal Obry
2001-06-22 2:18 ` DuckE
2001-06-22 17:33 ` Charles Hixson
2001-06-22 18:24 ` tmoran
2001-09-13 0:29 ` Gnat Windows load error tmoran
2001-09-13 18:15 ` Jerry van Dijk
2001-09-13 23:17 ` tmoran
2001-09-13 3:58 ` Ada web crawler tmoran
2001-11-17 21:50 ` ada.strings.bounded slice errors tmoran
2001-11-18 17:16 ` Florian Weimer
2001-11-18 19:31 ` tmoran
2001-11-19 7:12 ` Florian Weimer
2002-02-08 20:55 ` How to get a traceback in Gnat 3.14p tmoran
2002-02-08 21:24 ` Pascal Obry
2002-02-08 22:28 ` tmoran
2002-02-11 0:10 ` tmoran [this message]
2002-02-15 17:23 ` does gnatelim work? tmoran
2002-02-15 18:18 ` Stephen Leake
2002-02-15 21:58 ` tmoran
2002-02-18 1:31 ` Stephen Leake
2002-04-15 3:05 ` Announce: .rc files with Gnat tmoran
2002-04-15 14:48 ` Ted Dennison
2002-05-25 7:06 ` slice'access? tmoran
2002-05-25 16:47 ` slice'access? Robert Dewar
2002-05-25 18:28 ` slice'access? tmoran
2002-05-25 20:20 ` slice'access? Jeffrey Carter
2002-05-25 23:39 ` slice'access? tmoran
2002-05-26 14:22 ` slice'access? Robert Dewar
2002-09-30 1:54 ` 'write of bounded string? tmoran
2002-09-30 16:06 ` Stephen Leake
2002-10-27 23:01 ` phone# etc bdean
2002-10-28 3:04 ` tmoran
2002-11-06 3:14 ` A little Ada app tmoran
2002-11-06 11:37 ` Larry Kilgallen
2002-11-06 15:08 ` Ted Dennison
2002-11-06 18:02 ` tmoran
2001-06-21 3:09 ` Looping over a tagged record? gresset1
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox