* gnat.dg/test_prio_p.adb: Compile with -gnatws.

	* lib/gnat.exp (gnat_target_compile): Pass -f to the driver.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@122093 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d678133..05fdf91 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2007-02-18  Eric Botcazou  <ebotcazou@adacore.com>
+
+       * gnat.dg/test_prio_p.adb: Compile with -gnatws.
+       * lib/gnat.exp (gnat_target_compile): Pass -f to the driver.
+
 2007-02-16  Uros Bizjak  <ubizjak@gmail.com>
 
        * gcc.target/i386/builtin-bswap-1.c: Remove -march=nocona.

diff --git a/gcc/testsuite/gnat.dg/test_prio_p.adb b/gcc/testsuite/gnat.dg/test_prio_p.adb
index dd0d99a..333ab92 100644 (file)
--- a/gcc/testsuite/gnat.dg/test_prio_p.adb
+++ b/gcc/testsuite/gnat.dg/test_prio_p.adb
@@ -1,3 +1,5 @@
+-- { dg-options "-gnatws" }
+
 package body test_prio_p is
    protected body Protected_Queue_T is
       entry Seize when True is begin null; end;

diff --git a/gcc/testsuite/lib/gnat.exp b/gcc/testsuite/lib/gnat.exp
index 7960672..8832373 100644 (file)
--- a/gcc/testsuite/lib/gnat.exp
+++ b/gcc/testsuite/lib/gnat.exp
@@ -129,7 +129,7 @@ proc gnat_target_compile { source dest type options } {
 
     setenv ADA_INCLUDE_PATH "${rootme}/ada/rts"
     set ld_library_path ".:${gnat_libgcc_s_path}"
-    lappend options "compiler=$GNAT_UNDER_TEST -q"
+    lappend options "compiler=$GNAT_UNDER_TEST -q -f"
     lappend options "incdir=${rootme}/ada/rts"
 
     if { [target_info needs_status_wrapper]!="" && [info exists gluefile] } {