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.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM,
	WEIRD_QUOTING autolearn=ham autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,52b1fbc02aefcd3
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2003-05-05 01:31:03 PST
Path: 
 archiver1.google.com!news1.google.com!newsfeed.stanford.edu!headwall.stanford.edu!newsfeed.media.kyoto-u.ac.jp!newsfeed.icl.net!newsfeed.fjserv.net!news-FFM2.ecrc.net!news.cesnet.cz!crax.cesnet.cz!news.felk.cvut.cz!not-for-mail
From: Sergey Koshcheyev <serko84@hotmail.com>
Newsgroups: comp.lang.ada
Subject: Re: pragma Machine_Attribute
Date: Mon, 05 May 2003 10:17:08 +0200
Organization: Czech Technical University
Message-ID: <b956m4$1a8r$1@ns.felk.cvut.cz>
References: <cbdd91ae.0305031103.35be8143@posting.google.com>
NNTP-Posting-Host: r2c113.mistral.cz
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
X-Trace: ns.felk.cvut.cz 1052122629 43291 62.245.66.113 (5 May 2003 08:17:09
 GMT)
X-Complaints-To: usenet@ns.felk.cvut.cz
NNTP-Posting-Date: Mon, 5 May 2003 08:17:09 +0000 (UTC)
User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4a) Gecko/20030326
X-Accept-Language: en, ru, cs
In-Reply-To: <cbdd91ae.0305031103.35be8143@posting.google.com>
Xref: archiver1.google.com comp.lang.ada:36958
Date: 2003-05-05T10:17:08+02:00
List-Id: <comp.lang.ada>

Bernd Trog wrote:
> Hi,
> 
> I have this C stuff:
> 
> void boot(void) __attribute__ ((section (".bootloader")));
> 
> and this part of the Makefile to set the address at link-time:
> 
> gcc [...]  -Wl,--section-start=.bootloader=0x1E000
> 
> 
> Now I'd like to do the same in GNAT Ada.
> 
> I've tried:
> 
>    procedure Boot;
>    pragma Machine_Attribute (Entity => Boot,
>                              Attribute_Name => "section (.bootloader)"
>                              );
>    procedure Boot
>    is
>    begin   
>       null;
>    end;
> 
> and got this waring:
> 
> bootloader.adb:12: warning: `section (.bootloader)' attribute directive ignored
> 
> 
> And 'objdump -h' doesn't print a .bootloader section :-(

You probably have to include the quotes around .bootloader also in the 
pragma in the Ada source, like this:

pragma Machine_Attribute (Entity => Boot,
                           Attribute_Name => "section ("".bootloader"")"
                           );

Sergey.