[multiple changes]

2013-01-29  Robert Dewar  <dewar@adacore.com>

	* gnat_rm.texi: Document all Ada 2005 and Ada 2012 pragmas as
	being available as implementation-defined pragmas in earlier
	versions of Ada.

2013-01-29  Vincent Celier  <celier@adacore.com>

	* clean.adb (Delete): On VMS, delete all versions of the file.

From-SVN: r195537

gcc/ada/ChangeLog

 2013-01-29  Robert Dewar  <dewar@adacore.com>
 
+	* gnat_rm.texi: Document all Ada 2005 and Ada 2012 pragmas as
+	being available as implementation-defined pragmas in earlier
+	versions of Ada.
+
+2013-01-29  Vincent Celier  <celier@adacore.com>
+
+	* clean.adb (Delete): On VMS, delete all versions of the file.
+
+2013-01-29  Robert Dewar  <dewar@adacore.com>
+
 	* par-ch6.adb (No_Constraint_Maybe_Expr_Func): New procedure.
 	* par-util.adb (No_Constraint): Undo special handling, moved
 	to par-ch6.adb.

gcc/ada/clean.adb

@@ -1250,7 +1250,19 @@ package body Clean is
            or else Is_Writable_File (Full_Name (1 .. Last))
            or else Is_Symbolic_Link (Full_Name (1 .. Last))
          then
-            Delete_File (Full_Name (1 .. Last), Success);
+            --  On VMS, we have to delete all versions of the file
+
+            if OpenVMS_On_Target then
+               Delete_File (Full_Name (1 .. Last) & ";*", Success);
+
+            --  Otherwise just delete the specified file
+
+            else
+               Delete_File (Full_Name (1 .. Last), Success);
+            end if;
+
+         --  Here if no deletion required
+
          else
             Success := False;
          end if;