re PR ada/42978 (gnatmake doesn't report the options it actually provides to ranlib)

	PR ada/42978
	* mlib-utl.adb (ar): Output the options passed to ranlib.

From-SVN: r217346

gcc/ada/ChangeLog

+2014-11-11  Simon Wright  <simon@pushface.org>
+
+	PR ada/42978
+	* mlib-utl.adb (ar): Output the options passed to ranlib.
+
 2014-11-07  Arnaud Charlet  <charlet@adacore.com>
 
 	* debug.adb, snames.adb-tmpl (Is_Keyword_Name): Consider 'overriding'

gcc/ada/mlib-utl.adb

@@ -282,6 +282,10 @@ package body MLib.Utl is
          if not Opt.Quiet_Output then
             Write_Str  (Ranlib_Name.all);
             Write_Char (' ');
+            for J in Ranlib_Options'Range loop
+               Write_Str  (Ranlib_Options (J).all);
+               Write_Char (' ');
+            end loop;
             Write_Line (Arguments (Ar_Options'Length + 1).all);
          end if;