From: eachus@mitre-bedford.arpa (Robert I. Eachus)
Subject: Re: Forcing default representations
Date: 26 Jul 93 18:30:28 GMT [thread overview]
Message-ID: <EACHUS.93Jul26133028@spectre.mitre.org> (raw)
In article <9307201257.AA00575@eight-ball.boeing.com> crispen@eight-ball.boeing
.com (Bob Crispen) writes:
> What I had in mind of course was analogous to the universal practice:
> type Colors is (Mauve, Puce, Ultraviolet);
> for Each_Color in Colors loop
> "in Colors" being shorthand for "in Colors'first..Colors'last". I
> believe every Ada compiler accepts this, but I can't find the
> LRM entry that says where it has to. Probably right under my nose.
In 3.6(2) of course:
discrete_range ::= discrete_subtype_indication | range
since 13.4(2) says
component_clause ::=
component_name at static_simple_expression range static_range;
(The second occurances of discrete and component should be
italicized, as should both occurances of static. The words "at" and the
the first "range" in component clause are reserved).
> So, here's the question -- whose compiler has the bug in it? Or have
> I, in my quest to write portable code, ended up writing non-portable
> code? If you pick the latter, please say why!
Any compiler that rejects your component clauses is correct. The
DEC case is not quite as clear, but I don't read 13.4(8) as applying
here. Report it as a bug if you want, however, I think that in no
case should DEC change this behavior if people depend on it. (But
change your software to be portable, if your goal is portability. :-)
--
Robert I. Eachus
with Standard_Disclaimer;
use Standard_Disclaimer;
function Message (Text: in Clever_Ideas) return Better_Ideas is...
next reply other threads:[~1993-07-26 18:30 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
1993-07-26 18:30 Robert I. Eachus [this message]
-- strict thread matches above, loose matches on Subject: below --
1993-07-30 12:00 Forcing default representations Bob Gilbert
1993-07-30 1:15 pipex!warwick!zaphod.crihan.fr!univ-lyon1.fr!scsing.switch.ch!epflnews!di
1993-07-26 15:12 agate!howland.reston.ans.net!europa.eng.gtefsd.com!news.ans.net!newsgate.watson.ibm.com!yktnews.watson.ibm.com!ncohen
1993-07-24 21:16 Erik Magnuson
1993-07-24 17:13 pipex!sunic!news.funet.fi!funic!news.eunet.fi!prime!mits!rkaivola
1993-07-23 19:15 Gary Morris @ignite
1993-07-22 18:34 Bob Crispen
1993-07-20 12:57 Bob Crispen
1993-07-19 16:56 Adam Beneschan
1993-07-16 22:26 dog.ee.lbl.gov!overload.lbl.gov!agate!howland.reston.ans.net!noc.near.net
1993-07-13 19:22 crispen
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox