comp.lang.ada
 help / color / mirror / Atom feed
From: Mark Johnson <mark_h_johnson@raytheon.com>
Subject: Re: GNATing ada files with the wrong extensions.
Date: Wed, 22 Aug 2001 18:20:56 -0500
Date: 2001-08-22T18:20:56-05:00	[thread overview]
Message-ID: <3B843E58.19BDAF@raytheon.com> (raw)
In-Reply-To: GIHGrs.Gnt@news.boeing.com

Dale Pennington wrote:

> 1) run all the source code through GNATCHOP (or just a big rename script) to
> get the GNAT naming convention.
>
> 2) create a gnat.adc file and fill it with a zillion Source_File_Name
> pragma's.
>
> For reference I am using 3.13p at this time, and have read the docs. I was
> kinda hoping that there was acutally a method to tell GNAT to treat .1.ada
> as the same as .ads and .2.ada as the same as .adb.
>
> Am I missing something obvious, or are 1 and 2 my only options (and if so,
> has anyone generated a godd script to perform #2) ?
>

No, nothing obvious for 3.13p. We have a large application as well - a couple
million lines of code developed under Apex. Yes, we have a script that does the
generation of source file name pragmas, one per directory. We have another
script that assembles all of them into a monster file in the build directory.
We don't use either much any more, but I could probably send you a copy.

With the supported 3.14, we changed from #2 (big gnat.adc) to a two liner that
basically is...
  pragma Source_File_Name (Spec_File_Name => "*.1.ada");
  pragma Source_File_Name (Body_File_Name => "*.2.ada");
This works well for ALMOST all our code. We do have a couple vendors that
provided files in GNAT naming conventions - what a pain.

I could suggest alternative #3 - get a support contract from GNAT. [I know
you'll like that suggestion Robert...]

The new version of the compiler fixes this as well as lays in the framework for
significant improvements for defining "a project". Part of the project stuff
takes care of different naming conventions, directory structures, use of
environment variables, and so on.
 --Mark
(not an employee of ACT - but a user of their support)




      parent reply	other threads:[~2001-08-22 23:20 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-08-22 19:00 GNATing ada files with the wrong extensions Dale Pennington
2001-08-22 20:08 ` Ted Dennison
2001-08-22 23:20 ` Mark Johnson [this message]
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox