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 |