From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.3 required=5.0 tests=BAYES_00,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!.POSTED!not-for-mail
From: "G.B." <bauhaus@futureapps.invalid>
Newsgroups: comp.lang.ada
Subject: Re: Stackoverflow answer in need of update?
Date: Tue, 24 Feb 2015 13:21:27 +0100
Organization: A noiseless patient Spider
Message-ID: <mchqau$hi5$1@dont-email.me>
References: <mcfp8d$5j8$1@dont-email.me> <lymw4449x1.fsf@pushface.org>
 <lyioes49mv.fsf@pushface.org>
Reply-To: nonlegitur@futureapps.de
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 7bit
Injection-Date: Tue, 24 Feb 2015 12:20:46 +0000 (UTC)
Injection-Info: mx02.eternal-september.org;
 posting-host="b96887e80893c84a90c3007226ca0d1c";
	logging-data="17989"; mail-complaints-to="abuse@eternal-september.org";
	posting-account="U2FsdGVkX18pKOoE4KIGsAte6DFUyIXNpScThFCbYEc="
User-Agent: Mozilla/5.0 (Macintosh; Intel Mac OS X 10.9;
 rv:31.0) Gecko/20100101 Thunderbird/31.4.0
In-Reply-To: <lyioes49mv.fsf@pushface.org>
Cancel-Lock: sha1:2bbhWwmFIt1FqnwNh9KfP7sbixw=
Xref: news.eternal-september.org comp.lang.ada:25012
Date: 2015-02-24T13:21:27+01:00
List-Id: <comp.lang.ada>

On 23.02.15 22:10, Simon Wright wrote:
> And I don't see how to use it to produce an executable.

I'm still experimenting; the following command produces an
executable from a single source file with the help of gnatmake
only.

(This is perhaps nitpicking, but I still think it might be worth
adding that the "old" rule of 1 compilation unit per file
is no longer an absolute requirement.)

$ gnatmake -gnatl -gnateI1 multi.ada  -gnateI2
gcc -c -gnatl -gnateI1 -gnateI2 -x ada multi.ada

GNAT GPL 2014 (20140331)
Copyright 1992-2014, Free Software Foundation, Inc.


Compiling: multi.ada (source file time stamp: 2015-02-24 12:14:35)

      1. with Another;
      2.
      3. procedure Multi
      4. is begin
      5.    null;
      6. end Multi;
      7.
      8. with Ada.Text_IO;
      9. procedure Another
     10. is begin
     11.    Ada.Text_IO.Put_Line ("Another");
     12. end Another;
     13.

  13 lines: No errors
gnatbind -x multi.ali
gnatlink multi.ali
$ ./multi
Another
$