comp.lang.ada
 help / color / mirror / Atom feed
From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Subject: Re: GNAT subunit naming
Date: Fri, 14 Mar 2008 20:01:26 +0100
Date: 2008-03-14T20:01:26+01:00	[thread overview]
Message-ID: <q1363d44mow9$.9q9i1jrwbiwm.dlg@40tude.net> (raw)
In-Reply-To: c7ea2b68-f0f3-4b16-bfc0-b5c21d6ad95d@d21g2000prf.googlegroups.com

On Fri, 14 Mar 2008 11:35:11 -0700 (PDT), xorquewasp@googlemail.com wrote:

> Hi.
> 
> We have these files:
> 
> -- hello.ads
> package hello_device is
>   procedure func1;
>   procedure func2;
>   procedure func3;
> end;
> 
> -- hello.adb
> package body hello_device is
>   procedure func1 is separate;
>   procedure func2 is separate;
>   procedure func3 is separate;
> end;
> 
> -- hello_f1.adb
> with ada.text_io;
> 
> separate(hello_device)
> 
> procedure func1 is
> begin
>   ada.text_io.put("func1");
>   ada.text_io.new_line;
> end func1;
> 
> -- hello_f2.adb
> with ada.text_io;
> 
> separate(hello_device)
> 
> procedure func2 is
> begin
>   ada.text_io.put("func2");
>   ada.text_io.new_line;
> end func2;
> 
> -- hello_f3.adb
> with ada.text_io;
> 
> separate(hello_device)
> 
> procedure func3 is
> begin
>   ada.text_io.put("func3");
>   ada.text_io.new_line;
> end func3;
> 
> Now, I can tell GNAT that the files hello.ads and hello.adb
> provide the package 'hello_device' just fine with a
> couple of Source_File_Name pragmas but I can't seem to
> work out how to tell GNAT that hello_f[123].adb provide
> the subunits of this package.

hello_device-func1.adb
hello_device-func2.adb
hello_device-func3.adb ?

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de



  reply	other threads:[~2008-03-14 19:01 UTC|newest]

Thread overview: 8+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2008-03-14 18:35 GNAT subunit naming xorquewasp
2008-03-14 19:01 ` Dmitry A. Kazakov [this message]
2008-03-14 19:10   ` xorquewasp
2008-03-14 21:25     ` Jeffrey R. Carter
2008-03-14 21:49       ` xorquewasp
2008-03-14 20:22 ` Eric Hughes
2008-03-14 20:34   ` xorquewasp
2008-03-14 22:04     ` Per Sandberg
replies disabled

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