From 9e40de1d221e0803730de2ab48b6f4587ccaabd5 Mon Sep 17 00:00:00 2001 From: Jose Ruiz Date: Mon, 21 May 2018 14:51:42 +0000 Subject: [PATCH] [Ada] Minor typo fixes 2018-05-21 Jose Ruiz gcc/ada/ * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb, libgnarl/s-tassta.adb: Minor typo fixes From-SVN: r260462 --- gcc/ada/ChangeLog | 5 +++++ gcc/ada/doc/gnat_ugn/gnat_utility_programs.rst | 6 +++--- gcc/ada/exp_attr.adb | 2 +- gcc/ada/libgnarl/s-tassta.adb | 2 +- 4 files changed, 10 insertions(+), 5 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index ce5ef73b057..4954a17d0f8 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2018-04-04 Jose Ruiz + + * doc/gnat_ugn/gnat_utility_programs.rst, exp_attr.adb, + libgnarl/s-tassta.adb: Minor typo fixes + 2018-05-21 Ed Schonberg * 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 cbef8a04ba7..d617dcd7211 100644 --- 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 36e1815894e..9a00c4b86c9 100644 --- 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 635d80514c2..fe982e236b2 100644 --- 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); -- 2.30.2