| Index: gcc/gcc/testsuite/gnat.dg/warn5.adb
|
| diff --git a/gcc/gcc/testsuite/gnat.dg/warn5.adb b/gcc/gcc/testsuite/gnat.dg/warn5.adb
|
| index 108bc594c0c4f9fab30112a78a98fc5cf6865779..77e4a66f7331336564911fc39ec2c3e9daeb93c2 100644
|
| --- a/gcc/gcc/testsuite/gnat.dg/warn5.adb
|
| +++ b/gcc/gcc/testsuite/gnat.dg/warn5.adb
|
| @@ -26,7 +26,7 @@ procedure Warn5 is
|
|
|
| function Pointer (Pos : Natural; List : List_Type) return Pointer_Type is
|
| begin
|
| - return To_Ptr(List.A(Pos)'Address); -- { dg-warning "source alignment" "" { target alpha*-*-* hppa*-*-* ia64-*-* mips*-*-* sparc*-*-* } }
|
| + return To_Ptr(List.A(Pos)'Address); -- { dg-warning "source alignment" "" { target alpha*-*-* arm*-*-* hppa*-*-* ia64-*-* mips*-*-* sparc*-*-* } }
|
| end;
|
|
|
| begin
|
|
|