[multiple changes]

2015-10-26  Javier Miranda  <miranda@adacore.com>

	* exp_ch6.adb (Expand_N_Subprogram_Declaration): Skip the frontend
	transformation of functions that return a constrained array into
	a procedure when they are unchecked_conversion instances.

2015-10-26  Gary Dismukes  <dismukes@adacore.com>

	* s-os_lib.ads: Minor reformatting/rewording.

From-SVN: r229350

gcc/ada/ChangeLog

+2015-10-26  Javier Miranda  <miranda@adacore.com>
+
+	* exp_ch6.adb (Expand_N_Subprogram_Declaration): Skip the frontend
+	transformation of functions that return a constrained array into
+	a procedure when they are unchecked_conversion instances.
+
+2015-10-26  Gary Dismukes  <dismukes@adacore.com>
+
+	* s-os_lib.ads: Minor reformatting/rewording.
+
 2015-10-26  Arnaud Charlet  <charlet@adacore.com>
 
 	* debug.adb: Introduce debug flag -gnatd.5.

gcc/ada/exp_ch6.adb

@@ -5666,10 +5666,15 @@ package body Exp_Ch6 is
       --  constrained array type into a procedure with an out parameter
       --  that carries the return value.
 
+      --  We skip this transformation for unchecked conversions, since they
+      --  are not needed by the C generator (and this also produces cleaner
+      --  output).
+
       if Modify_Tree_For_C
         and then Nkind (Specification (N)) = N_Function_Specification
         and then Is_Array_Type (Etype (Subp))
         and then Is_Constrained (Etype (Subp))
+        and then not Is_Unchecked_Conversion_Instance (Subp)
       then
          Build_Procedure_Form;
       end if;

gcc/ada/s-os_lib.ads

@@ -877,14 +877,12 @@ package System.OS_Lib is
    --  there is no notion of executables under this OS.
 
    procedure Kill (Pid : Process_Id; Hard_Kill : Boolean := True);
-   --  Kill process known as Pid by the OS. Does nothing if Pid is
-   --  Invalid_Pid or on platforms where it is not supported like
-   --  VxWorks.
-   --  Hard_Kill is True by default and in this case the process
-   --  is terminated immediately. If Hard_Kill is False a signal
-   --  SIGINT is sent to the process on POSIX OS or a CTRL-C event
-   --  on Windows, this let the process a chance to quit properly
-   --  using a corresponding handler.
+   --  Kill the process designated by Pid. Does nothing if Pid is Invalid_Pid
+   --  or on platforms where it is not supported, such as VxWorks. Hard_Kill
+   --  is True by default, and when True the process is terminated immediately.
+   --  If Hard_Kill is False, then a signal SIGINT is sent to the process on
+   --  POSIX OS or a ctrl-C event on Windows, allowing the process a chance to
+   --  terminate properly using a corresponding handler.
 
    function Argument_String_To_List
      (Arg_String : String) return Argument_List_Access;