* validsw.adb: Properly save -gnatVn status.

From-SVN: r46221

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index ae5b996..50734bb 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2001-10-11  Robert Dewar  <dewar@gnat.com>
+
+       * validsw.adb: Properly save -gnatVn status.
+
 2001-10-11  Robert Dewar <dewar@gnat.com>
        
        * usage.adb: Add lines for V switch.

diff --git a/gcc/ada/validsw.adb b/gcc/ada/validsw.adb
index 923c913..5c2cbd8 100644 (file)
--- a/gcc/ada/validsw.adb
+++ b/gcc/ada/validsw.adb
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---                            $Revision: 1.2 $
+--                            $Revision$
 --                                                                          --
 --             Copyright (C) 2001 Free Software Foundation, Inc.            --
 --                                                                          --
@@ -74,8 +74,9 @@ package body Validsw is
          Options (K) := ' ';
       end loop;
 
+      Add ('n', not Validity_Check_Default);
+
       Add ('c', Validity_Check_Copies);
-      Add ('d', Validity_Check_Default);
       Add ('f', Validity_Check_Floating_Point);
       Add ('i', Validity_Check_In_Params);
       Add ('m', Validity_Check_In_Out_Params);