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=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,4486f278cc4730a7,start
X-Google-Attributes: gid103376,public
From: Vincent Smeets <Vincent.Smeets@CCI.de>
Subject: Multiple partitions with GNAT 3.12p
Date: 2000/11/15
Message-ID: <3A1284C8.58C2405D@CCI.de>#1/1
X-Deja-AN: 693876941
Content-Transfer-Encoding: 7bit
X-Accept-Language: en, nl, de-DE
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: newsadmin@CCI.de
X-Trace: freya.cci.de 974292169 9231 194.173.164.254 (15 Nov 2000 12:42:49
 GMT)
Organization: CCI GmbH
Mime-Version: 1.0
NNTP-Posting-Date: 15 Nov 2000 12:42:49 GMT
Newsgroups: comp.lang.ada
Date: 2000-11-15T12:42:49+00:00
List-Id: <comp.lang.ada>

Hallo,

I'm using GNAT 3.12p. How can I compile and link a program with multiple
partitions? What must I do to create the partitions?

As an example, I want package A to be a separate partition from the main
program B.

package A is
   procedure P (I : String);
end A;

with Ada.Text_IO;
package body A is
   procedure P (I : String) is
   begin
      Ada.Text_IO.Put_Line (I);
   end P;
end A;

with A;
procedure B is
begin
   A.P ("Testing partitions.");
end B:

-- Vincent Smeets                 Competence Center Informatik GmbH
-- Tel. : +49-5931-805461         Postfach 1225
-- Fax  : +49-5931-805175         49702 Meppen, Germany
-- EMail: Vincent.Smeets@CCI.de   http://www.CCI.de/
-- PGP fingerprint: 53 1C 3B 6F B6 9A EB 83  B4 7E 25 08 78 BD 5C 2C