[Ada] Minor typo fixes

2018-05-21  Jose Ruiz  <ruiz@adacore.com>

gcc/ada/

	* doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
	libgnarl/s-tassta.adb: Minor typo fixes

From-SVN: r260462

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index ce5ef73..4954a17 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,8 @@
+2018-04-04  Jose Ruiz  <ruiz@adacore.com>
+
+       * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb,
+       libgnarl/s-tassta.adb: Minor typo fixes
+
 2018-05-21  Ed Schonberg  <schonberg@adacore.com>
 
        * sem_ch4.adb (Analyze_One_Call): Recognize complex cases where an

diff --git a/gcc/ada/doc/gnat_ugn/gnat_utility_programs.rst b/gcc/ada/doc/gnat_ugn/gnat_utility_programs.rst
index cbef8a0..d617dcd 100644 (file)
--- a/gcc/ada/doc/gnat_ugn/gnat_utility_programs.rst
+++ b/gcc/ada/doc/gnat_ugn/gnat_utility_programs.rst
@@ -4078,8 +4078,8 @@ Alternatively, you may run the script using the following command line:
       for which a body must be created or a library unit body for which subunits
       must be created for the body stubs declared in this body.
       The file name may contain the path information.
-      If the name does not follow GNAT file naming conventions and a set
-      of seitches does not contain a project file that defines naming
+      If the name does not follow GNAT file naming conventions and the set
+      of switches does not contain a project file that defines naming
       conventions, the name of the body file must
       be provided
       explicitly as the value of the :switch:`-o{body-name}` option.
@@ -4146,7 +4146,7 @@ Alternatively, you may run the script using the following command line:
 
   :switch:`--subunits`
     Generate subunits for body stubs. If this switch is specified,
-    ``gnatstub`` expects a library unit body as an agrument file,
+    ``gnatstub`` expects a library unit body as an argument file,
     otherwise a library unit declaration is expected. If a body stub
     already has a corresponding subunit, ``gnatstub`` does not
     generate anything for it.

diff --git a/gcc/ada/exp_attr.adb b/gcc/ada/exp_attr.adb
index 36e1815..9a00c4b 100644 (file)
--- a/gcc/ada/exp_attr.adb
+++ b/gcc/ada/exp_attr.adb
@@ -6506,7 +6506,7 @@ package body Exp_Attr is
          Save_Validity_Checks_On : constant Boolean := Validity_Checks_On;
          --  Save the validity checking mode. We always turn off validity
          --  checking during process of 'Valid since this is one place
-         --  where we do not want the implicit validity checks to intefere
+         --  where we do not want the implicit validity checks to interfere
          --  with the explicit validity check that the programmer is doing.
 
          function Make_Range_Test return Node_Id;

diff --git a/gcc/ada/libgnarl/s-tassta.adb b/gcc/ada/libgnarl/s-tassta.adb
index 635d805..fe982e2 100644 (file)
--- a/gcc/ada/libgnarl/s-tassta.adb
+++ b/gcc/ada/libgnarl/s-tassta.adb
@@ -655,7 +655,7 @@ package body System.Tasking.Stages is
          T.Common.Task_Image_Len := Len;
       end if;
 
-      --  Note: we used to have code here to initialize T.Commmon.Domain, but
+      --  Note: we used to have code here to initialize T.Common.Domain, but
       --  that is not needed, since this is initialized in System.Tasking.
 
       Unlock (Self_ID);