From: Thomas Quinot <quinot@adacore.com>
Date: Tue, 27 May 2008 10:44:05 +0000 (+0200)
Subject: sem_res.adb: Minor comment fixes
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6ba6b1e33331f89ae41ce79e4edf3aee5b744f9c;p=gcc.git

sem_res.adb: Minor comment fixes

2008-05-27  Thomas Quinot  <quinot@adacore.com>

	* sem_res.adb: Minor comment fixes

From-SVN: r136004
---

diff --git a/gcc/ada/sem_res.adb b/gcc/ada/sem_res.adb
index 9cc285f1100..f59e6415962 100644
--- a/gcc/ada/sem_res.adb
+++ b/gcc/ada/sem_res.adb
@@ -6561,7 +6561,7 @@ package body Sem_Res is
    procedure Resolve_Null (N : Node_Id; Typ : Entity_Id) is
    begin
       --  Handle restriction against anonymous null access values This
-      --  restriction can be turned off using -gnatdh.
+      --  restriction can be turned off using -gnatdj.
 
       --  Ada 2005 (AI-231): Remove restriction
 
@@ -6571,7 +6571,7 @@ package body Sem_Res is
         and then Comes_From_Source (N)
       then
          --  In the common case of a call which uses an explicitly null
-         --  value for an access parameter, give specialized error msg
+         --  value for an access parameter, give specialized error message.
 
          if Nkind_In (Parent (N), N_Procedure_Call_Statement,
                                   N_Function_Call)