RISC-V: Silence expected Ada testsuite warning.

Message ID 20180712203247.1453-1-jimw@sifive.com
State New
Headers show
Series
  • RISC-V: Silence expected Ada testsuite warning.
Related show

Commit Message

Jim Wilson July 12, 2018, 8:32 p.m.
This eliminates one Ada testsuite failure, by adding riscv*-*-* for the list
of targets that expect this warning.  This was pre-approved by Eric Botcazou.

Tested with a riscv64-linux native Ada testsuite run.  There was one less
failure with this patch.

Committed.

Jim

	gcc/testsuite/
	* gnat.dg/warn5.adb: Expect warning for riscv*-*-*.
---
 gcc/testsuite/gnat.dg/warn5.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

Patch

diff --git a/gcc/testsuite/gnat.dg/warn5.adb b/gcc/testsuite/gnat.dg/warn5.adb
index 77e4a66f733..61f76972480 100644
--- a/gcc/testsuite/gnat.dg/warn5.adb
+++ b/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*-*-* arm*-*-* hppa*-*-* ia64-*-* mips*-*-* sparc*-*-* } }
+    return To_Ptr(List.A(Pos)'Address); -- { dg-warning "source alignment" "" { target alpha*-*-* arm*-*-* hppa*-*-* ia64-*-* mips*-*-* riscv*-*-* sparc*-*-* } }
   end;
 
 begin