ada/10671: gcc ignors named notation for pragma arguments

[berndtrog@yahoo.com]

>Number:         10671
>Category:       ada
>Synopsis:       gcc ignors named notation for pragma arguments
>Confidential:   no
>Severity:       serious
>Priority:       medium
>Responsible:    unassigned
>State:          open
>Class:          sw-bug
>Submitter-Id:   net
>Arrival-Date:   Wed May 07 20:26:00 UTC 2003
>Closed-Date:
>Last-Modified:
>Originator:     Bernd Trog
>Release:        gcc version 3.3 20030127 (prerelease)
>Organization:
>Environment:
linux, i386
>Description:
$gnatmake bootloader.adb 
gcc -c bootloader.adb
bootloader.adb:7:48: argument for pragma "machine_attribute" must be local name
gnatmake: "bootloader.adb" compilation error

Workaround: reordering the arguments :-/
>How-To-Repeat:
with Ada.Text_Io;

procedure bootloader is
   procedure Boot;

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

   procedure Boot
   is
   begin
      Ada.Text_Io.Put_line("Test");
   end;


begin
   Ada.Text_Io.Put_line("Test");
end;
>Fix:
unknown
>Release-Note:
>Audit-Trail:
>Unformatted: