From: Arnaud Charlet <charlet@adacore.com>
Date: Tue, 6 Jan 2015 10:45:03 +0000 (+0000)
Subject: Kill new warnings.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=02169d7807750eba35013a832975df24bf309384;p=gcc.git

Kill new warnings.

From-SVN: r219255
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 634953cb0d5..8cba5d9f8d6 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2015-01-06  Arnaud Charlet  <charlet@adacore.com>
+
+	* gnat.db/fixce.adb, gnat.db/specs/delta_small.ads: Kill warnings.
+
 2015-01-06  Jakub Jelinek  <jakub@redhat.com>
 
 	* c-c++-common/asan/sanitize-all-1.c: New test.
diff --git a/gcc/testsuite/gnat.dg/fixce.adb b/gcc/testsuite/gnat.dg/fixce.adb
index 91e02e79383..53889e45a1f 100644
--- a/gcc/testsuite/gnat.dg/fixce.adb
+++ b/gcc/testsuite/gnat.dg/fixce.adb
@@ -1,4 +1,5 @@
 --  { dg-do run }
+--  { dg-options "-gnatws" }
 
 procedure fixce is
    type D is delta 128.0 / (2 ** 15) range 0.0 .. 256.0;
diff --git a/gcc/testsuite/gnat.dg/specs/delta_small.ads b/gcc/testsuite/gnat.dg/specs/delta_small.ads
index 3ff74263131..3485ec721bb 100644
--- a/gcc/testsuite/gnat.dg/specs/delta_small.ads
+++ b/gcc/testsuite/gnat.dg/specs/delta_small.ads
@@ -1,4 +1,5 @@
 -- { dg-do compile }
+-- { dg-options "-gnatws" }
 
 package Delta_Small is
    type T is delta 0.1 range -0.8 .. 0.8;