gnat_rm.texi: First set of documentation additions for predefined RM units.

2014-02-25  Robert Dewar  <dewar@adacore.com>

	* gnat_rm.texi: First set of documentation additions for
	predefined RM units.
	* checks.adb: Minor reformatting.
	* sem_elab.adb (Check_Task_Activation): Minor fix to error
	message.
	* sem_util.adb: Minor reformatting.

From-SVN: r208141

gcc/ada/ChangeLog

+2014-02-25  Robert Dewar  <dewar@adacore.com>
+
+	* gnat_rm.texi: First set of documentation additions for
+	predefined RM units.
+	* checks.adb: Minor reformatting.
+	* sem_elab.adb (Check_Task_Activation): Minor fix to error
+	message.
+	* sem_util.adb: Minor reformatting.
+
 2014-02-25  Arnaud Charlet  <charlet@adacore.com>
 
 	* usage.adb (Usage): Add help on -gnateC.

gcc/ada/checks.adb

@@ -1516,8 +1516,8 @@ package body Checks is
 
       if Nkind (Original_Node (N)) /= N_Allocator
         and then (No (Lhs)
-          or else not Is_Entity_Name (Lhs)
-          or else No (Param_Entity (Lhs)))
+                   or else not Is_Entity_Name (Lhs)
+                   or else No (Param_Entity (Lhs)))
       then
          if (Etype (N) = Typ
               or else (Do_Access and then Designated_Type (Typ) = S_Typ))
@@ -1767,7 +1767,6 @@ package body Checks is
          if Do_Overflow_Check (N)
            and then not Overflow_Checks_Suppressed (Etype (N))
          then
-
             --  Test for extremely annoying case of xxx'First divided by -1
             --  for division of signed integer types (only overflow case).
 

gcc/ada/sem_elab.adb

@@ -2557,7 +2557,7 @@ package body Sem_Elab is
                Error_Msg_Node_2 := Task_Scope;
                Error_Msg_NE
                  ("info: activation of an instance of task type&" &
-                  " requires pragma Elaborate_All on &?l?", N, Ent);
+                  " requires pragma Elaborate_All on &?", N, Ent);
             end if;
 
             Activate_Elaborate_All_Desirable (N, Task_Scope);

gcc/ada/sem_util.adb

@@ -11989,8 +11989,6 @@ package body Sem_Util is
       Last_Assignment_Only : Boolean := False)
    is
    begin
-      --  ??? do we have to worry about clearing cached checks?
-
       if Is_Assignable (Ent) then
          Set_Last_Assignment (Ent, Empty);
       end if;