diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-17 04:40:08 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-17 04:40:08 +0000 |
commit | d60c3572b2c5c73d0217066d3f4ebdae01663e53 (patch) | |
tree | 5157f3170a53eb9be6b856dcaeec31decab08ffe /gcc/testsuite/gnat.dg/specs/linker_section.ads | |
parent | 1d6ddbbde651efdc85412db5e1e8b2d01501023c (diff) | |
download | gcc-d60c3572b2c5c73d0217066d3f4ebdae01663e53.tar.gz |
2008-04-17 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk r134362
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@134378 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gnat.dg/specs/linker_section.ads')
-rw-r--r-- | gcc/testsuite/gnat.dg/specs/linker_section.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/testsuite/gnat.dg/specs/linker_section.ads b/gcc/testsuite/gnat.dg/specs/linker_section.ads index ae2d4029cf9..73e89aa48e1 100644 --- a/gcc/testsuite/gnat.dg/specs/linker_section.ads +++ b/gcc/testsuite/gnat.dg/specs/linker_section.ads @@ -3,8 +3,11 @@ package Linker_Section is pragma Linker_Section (Entity => Data1, Section => ".eeprom"); type EEPROM_String is new String; - pragma Linker_Section (Entity => EEPROM_String, -- { dg-error "type" } + pragma Linker_Section (Entity => EEPROM_String, -- { dg-error "objects" } Section => ".eeprom"); Data2 : constant EEPROM_String := "12345678901234567"; + package Inner is end; + pragma Linker_Section (Entity => Inner, -- { dg-error "objects" } + Section => ".eeprom"); end Linker_Section; |