Fix typos in gcc/ada.

gcc/ada/:
	* projects.texi: Fix typos.
	* gnat_rm.texi: Likewise.
	* gnat_ugn.texi: Likewise.
	* sem_util.adb: Fix typo in variable, typos in comments.
	* a-btgbso.adb: Fix typos in comments.
	* a-cbdlli.adb, a-cbhase.ads, a-cdlili.adb, a-cobove.adb,
	a-coinve.adb, a-convec.adb, a-direct.ads, a-strunb-shared.adb,
	a-strunb-shared.ads, a-stuten.ads, a-stwiun-shared.adb,
	a-stwiun-shared.ads, a-stzunb-shared.adb, a-stzunb-shared.ads,
	a-suenco.adb, a-suenst.adb, a-suewst.adb, a-suezst.adb, ali.ads,
	aspects.ads, atree.ads, binde.adb, bindgen.adb, checks.adb,
	checks.ads, einfo.ads, err_vars.ads, errout.adb, errout.ads,
	exp_aggr.adb, exp_attr.adb, exp_cg.adb, exp_ch3.adb,
	exp_ch4.adb, exp_ch5.adb, exp_ch6.adb, exp_ch7.adb,
	exp_dbug.ads, exp_disp.adb, exp_fixd.ads, freeze.adb,
	g-altive.ads, g-comlin.ads, g-excact.ads, g-mbdira.adb,
	g-sechas.ads, g-sehash.ads, g-sha1.ads, g-sha224.ads,
	g-sha256.ads, g-sha384.ads, g-sha512.ads, g-shsh32.ads,
	g-shsh64.ads, g-socket.adb, g-socket.ads, g-sothco.ads,
	gcc-interface/decl.c, gcc-interface/trans.c,
	gcc-interface/utils2.c, gnat1drv.adb, init.c, inline.adb,
	link.c, locales.c, make.adb, mingw32.h, namet.ads, osint.adb,
	par-ch12.adb, par-ch13.adb, par-ch3.adb, par-ch4.adb,
	par-prag.adb, par.adb, par_sco.adb, prepcomp.adb,
	prj-conf.ads, prj-dect.adb, prj-env.adb, prj-env.ads,
	prj-nmsc.adb, prj-tree.ads, prj-util.ads, prj.adb, prj.ads,
	s-auxdec-vms-alpha.adb, s-auxdec-vms_64.ads, s-oscons-tmplt.c,
	s-osinte-vxworks.ads, s-osprim-mingw.adb, s-regexp.adb,
	s-stusta.adb, s-taprop-mingw.adb, s-taprop-solaris.adb,
	scn.adb, scos.ads, sem.adb, sem_aggr.adb, sem_attr.adb,
	sem_aux.adb, sem_aux.ads, sem_ch12.adb, sem_ch12.ads,
	sem_ch13.adb, sem_ch13.ads, sem_ch3.adb, sem_ch4.adb,
	sem_ch6.adb, sem_ch7.adb, sem_ch8.adb, sem_disp.adb,
	sem_disp.ads, sem_eval.adb, sem_intr.adb, sem_prag.adb,
	sem_res.adb, sem_scil.adb, sem_util.ads, sem_warn.adb,
	sem_warn.ads, sinfo.ads, socket.c, styleg.adb, switch.ads,
	sysdep.c, tb-alvxw.c, xoscons.adb: Likewise.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@168082 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 15 insertions, 14 deletions

diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb
index 68452392994..46a966827fc 100644
--- a/gcc/ada/checks.adb
+++ b/gcc/ada/checks.adb
@@ -102,7 +102,7 @@ package body Checks is
    --  how we ensure that this condition is met.
 
    --  First, we need to know for certain that the previous expression has
-   --  been executed. This is done principly by the mechanism of calling
+   --  been executed. This is done principally by the mechanism of calling
    --  Conditional_Statements_Begin at the start of any statement sequence
    --  and Conditional_Statements_End at the end. The End call causes all
    --  checks remembered since the Begin call to be discarded. This does
@@ -159,7 +159,7 @@ package body Checks is
       Target_Type : Entity_Id;
       --  Used only if Do_Range_Check is set. Records the target type for
       --  the check. We need this, because a check is a duplicate only if
-      --  it has a the same target type (or more accurately one with a
+      --  it has the same target type (or more accurately one with a
       --  range that is smaller or equal to the stored target type of a
       --  saved check).
    end record;
@@ -650,10 +650,11 @@ package body Checks is
          return;
       end if;
 
-      --  Here we do not know if the value is acceptable. Stricly we don't have
-      --  to do anything, since if the alignment is bad, we have an erroneous
-      --  program. However we are allowed to check for erroneous conditions and
-      --  we decide to do this by default if the check is not suppressed.
+      --  Here we do not know if the value is acceptable. Strictly we don't
+      --  have to do anything, since if the alignment is bad, we have an
+      --  erroneous program. However we are allowed to check for erroneous
+      --  conditions and we decide to do this by default if the check is not
+      --  suppressed.
 
       --  However, don't do the check if elaboration code is unwanted
 
@@ -1003,7 +1004,7 @@ package body Checks is
          return;
       end if;
 
-      --  Apply required constaint checks
+      --  Apply required constraint checks
 
       if Is_Scalar_Type (Typ) then
          Apply_Scalar_Range_Check (N, Typ);
@@ -2148,7 +2149,7 @@ package body Checks is
 
                --  If checks are off, then analyze the length check after
                --  temporarily attaching it to the tree in case the relevant
-               --  condition can be evaluted at compile time. We still want a
+               --  condition can be evaluated at compile time. We still want a
                --  compile time warning in this case.
 
                else
@@ -2770,7 +2771,7 @@ package body Checks is
               ("use `OR ELSE` instead of OR?", P);
          end if;
 
-         --  If not short-circuited, we need the ckeck
+         --  If not short-circuited, we need the check
 
          return True;
 
@@ -4029,7 +4030,7 @@ package body Checks is
       then
          return;
 
-      --  No check on a univeral real constant. The context will eventually
+      --  No check on a universal real constant. The context will eventually
       --  convert it to a machine number for some target type, or report an
       --  illegality.
 
@@ -4038,7 +4039,7 @@ package body Checks is
       then
          return;
 
-      --  If the expression denotes a component of a packed boolean arrray,
+      --  If the expression denotes a component of a packed boolean array,
       --  no possible check applies. We ignore the old ACATS chestnuts that
       --  involve Boolean range True..True.
 
@@ -5226,7 +5227,7 @@ package body Checks is
               Reason => CE_Invalid_Data),
             Suppress => Validity_Check);
 
-         --  If the expression is a a reference to an element of a bit-packed
+         --  If the expression is a reference to an element of a bit-packed
          --  array, then it is rewritten as a renaming declaration. If the
          --  expression is an actual in a call, it has not been expanded,
          --  waiting for the proper point at which to do it. The same happens
@@ -5343,7 +5344,7 @@ package body Checks is
                   return False;
                end if;
 
-               --  If we are in a case eexpression, and not part of the
+               --  If we are in a case expression, and not part of the
                --  expression, then we return False, since a particular
                --  branch may not always be elaborated
 
@@ -6073,7 +6074,7 @@ package body Checks is
             --  The checking code to be generated will freeze the
             --  corresponding array type. However, we must freeze the
             --  type now, so that the freeze node does not appear within
-            --  the generated condional expression, but ahead of it.
+            --  the generated conditional expression, but ahead of it.
 
             Freeze_Before (Ck_Node, T_Typ);