From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 6116 invoked by alias); 7 May 2003 20:06:01 -0000 Mailing-List: contact gcc-prs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Archive: List-Post: List-Help: Sender: gcc-prs-owner@gcc.gnu.org Received: (qmail 6095 invoked by uid 71); 7 May 2003 20:06:00 -0000 Resent-Date: 7 May 2003 20:06:00 -0000 Resent-Message-ID: <20030507200600.6094.qmail@sources.redhat.com> Resent-From: gcc-gnats@gcc.gnu.org (GNATS Filer) Resent-Cc: gcc-prs@gcc.gnu.org, gcc-bugs@gcc.gnu.org Resent-Reply-To: gcc-gnats@gcc.gnu.org, berndtrog@yahoo.com Received: (qmail 3251 invoked by uid 48); 7 May 2003 20:01:48 -0000 Message-Id: <20030507200148.3250.qmail@sources.redhat.com> Date: Wed, 07 May 2003 20:06:00 -0000 From: berndtrog@yahoo.com Reply-To: berndtrog@yahoo.com To: gcc-gnats@gcc.gnu.org X-Send-Pr-Version: gnatsweb-2.9.3 (1.1.1.1.2.31) Subject: ada/10670: gcc ignors 'pragma Machine_Attribute' directive X-SW-Source: 2003-05/txt/msg00501.txt.bz2 List-Id: >Number: 10670 >Category: ada >Synopsis: gcc ignors 'pragma Machine_Attribute' directive >Confidential: no >Severity: critical >Priority: medium >Responsible: unassigned >State: open >Class: sw-bug >Submitter-Id: net >Arrival-Date: Wed May 07 20:06:00 UTC 2003 >Closed-Date: >Last-Modified: >Originator: Bernd Trog >Release: gcc version 3.3 20030127 (prerelease) >Organization: >Environment: Linux, i386 Reading specs from /usr/local/gcc330-20030127/lib/gcc-lib/i686-pc-linux-gnu/3.3/specs Configured with: ../gcc-20030127/configure --prefix=/usr/local/gcc330-20030127 --enable-languages=c,c++,ada Thread model: posix gcc version 3.3 20030127 (prerelease) >Description: gcc ignors 'pragma Machine_Attribute' directive: $gnatmake bootloader.adb gcc -c bootloader.adb bootloader.adb: In function `bootloader': bootloader.adb:7: warning: `section (".bootloader")' attribute directive ignored gnatbind -x bootloader.ali gnatlink bootloader.ali $objdump -h bootloader.o bootloader.o: file format elf32-i386 Sections: Idx Name Size VMA LMA File off Algn 0 .text 0000003b 00000000 00000000 00000034 2**2 CONTENTS, ALLOC, LOAD, RELOC, READONLY, CODE 1 .data 00000000 00000000 00000000 00000070 2**2 CONTENTS, ALLOC, LOAD, DATA 2 .bss 00000000 00000000 00000000 00000070 2**2 ALLOC 3 .rodata 0000000c 00000000 00000000 00000070 2**2 CONTENTS, ALLOC, LOAD, READONLY, DATA 4 .comment 00000026 00000000 00000000 0000007c 2**0 CONTENTS, READONLY No .bootloader section! >How-To-Repeat: with Ada.Text_Io; procedure bootloader is procedure Boot; pragma Machine_Attribute ( Entity => Boot, Attribute_Name => "section ("".bootloader"")" ); procedure Boot is begin Ada.Text_Io.Put_line("Boot"); end; begin Ada.Text_Io.Put_line("Test"); end; >Fix: >Release-Note: >Audit-Trail: >Unformatted: