Re: Ada 83 compiler

[nobody@REPLAY.COM (Anonymous)]

<01bcccb5$53b2b9a0$8129accf@default>
<mheaney-ya023680003009970439540001@news.ni.net>

On 1 Oct 97 01:18:19 GMT, steved@pacifier.com (Steve Doiel) wrote:

> >In article <01bcccb5$53b2b9a0$8129accf@default>, "James H. Robinson, III"
> ><jr3uva90@erols.com> wrote:
> >
> >>I am a graduate student at George Mason University.  Can anyone recommend a
> >>cheap or free Ada compiler for Windows 95 or NT?
> >
> >Why Ada 83?  You can get a good-quality Ada 95 compiler for free at
> >
> ><ftp://ftp.cs.nyu.edu>.  Look under GNAT, the GNU NYU Ada Translator.
> >
> >See also <http://www.adahome.com>.
> >
> Also note that GNAT has a command line switch "-gnat83" to specify that an
> Ada 83 program is begin compiled.  When in this mode Ada95 extensions are
> rejected.
> 
> This is according to the GNAT users guide (Version 3.07).  I haven't used
> this mode myself so cannot recommend for or against.
> 

We're using the -gnat83 switch. We're developing using GNAT, but the
code will be compiled and run on a DEC Alpha under VMS with the DEC
Ada-83 compiler. I have suggested that we use GNAT, with support, for
that platform and take advantage of Ada's features, but it doesn't look
as if that will be allowed.

There are a couple of things that GNAT doesn't catch. One is the Ada-83
rule about using the name of the generic subprogram being declared in
the declaration:

   function "+" is new Some_Generic (Op => "+");

This is legal in Ada but illegal in Ada 83; -gnat83 doesn't catch it. We
get around it in DEC Ada with a renaming of the first "+":

   function Rplus (L, R : Item) return Item renames "+";
   function "+" is new Some_Generic (Op => Rplus);

The other one I've found is that -gnat83 lets you read the value of an
out mode parameter.

Jeff Carter  PGP:1024/440FBE21
My real e-mail address: ( carter @ innocon . com )
"I fart in your general direction."
Monty Python & the Holy Grail

Posted with Spam Hater - see
http://www.compulink.co.uk/~net-services/spam/