aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorGary Dismukes <dismukes@adacore.com>2021-06-14 15:37:49 -0400
committerPierre-Marie de Rodat <derodat@adacore.com>2021-07-09 12:35:31 +0000
commit79b87fcf29cd100f15ae68bd74bf94830bf41564 (patch)
tree8a003880dd4cb31076efc93d5a08ea7c8c9bd4a8 /gcc/ada
parente4de29f4677e81e71c60eb2b9f247eaa12ea1353 (diff)
downloadgcc-79b87fcf29cd100f15ae68bd74bf94830bf41564.zip
gcc-79b87fcf29cd100f15ae68bd74bf94830bf41564.tar.gz
gcc-79b87fcf29cd100f15ae68bd74bf94830bf41564.tar.bz2
[Ada] Typo corrections and minor reformatting
gcc/ada/ * libgnarl/s-osinte__vxworks.ads: Fix typo ("release" => "releases") plus comment reformatting. * libgnat/s-os_lib.ads: In a comment, fix typo ("indended" => "intended"), add a hyphen and semicolon, plus reformatting. In comment for subtype time_t, fix typo ("effect" => "affect"), add hyphens, plus reformatting. * libgnat/s-parame.ads, libgnat/s-parame__ae653.ads, libgnat/s-parame__hpux.ads: Remove period from one-line comment.
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/libgnarl/s-osinte__vxworks.ads6
-rw-r--r--gcc/ada/libgnat/s-os_lib.ads19
-rw-r--r--gcc/ada/libgnat/s-parame.ads2
-rw-r--r--gcc/ada/libgnat/s-parame__ae653.ads2
-rw-r--r--gcc/ada/libgnat/s-parame__hpux.ads2
5 files changed, 15 insertions, 16 deletions
diff --git a/gcc/ada/libgnarl/s-osinte__vxworks.ads b/gcc/ada/libgnarl/s-osinte__vxworks.ads
index 8b9c5bf..a2d5620 100644
--- a/gcc/ada/libgnarl/s-osinte__vxworks.ads
+++ b/gcc/ada/libgnarl/s-osinte__vxworks.ads
@@ -242,9 +242,9 @@ package System.OS_Interface is
type time_t is range -2 ** (System.Parameters.time_t_bits - 1)
.. 2 ** (System.Parameters.time_t_bits - 1) - 1;
- -- Time_t here used to be unsigned to match the VxWorks header
- -- declaration. The header declaration has changed in newer release
- -- and is now signed for applications.
+ -- Time_t here used to be unsigned to match the VxWorks header declaration.
+ -- The header declaration has changed in newer releases and is now signed
+ -- for applications.
type timespec is record
ts_sec : time_t;
diff --git a/gcc/ada/libgnat/s-os_lib.ads b/gcc/ada/libgnat/s-os_lib.ads
index 4c279d5..2049e38 100644
--- a/gcc/ada/libgnat/s-os_lib.ads
+++ b/gcc/ada/libgnat/s-os_lib.ads
@@ -168,18 +168,17 @@ package System.OS_Lib is
-- Time_t Stuff --
------------------
- -- Note: Do not use time_t in the compiler and host based tools,
- -- instead use OS_Time. These 3 declarations are indended for use only
- -- by consumers of the GNAT.OS_Lib renaming of this package.
+ -- Note: Do not use time_t in the compiler and host-based tools; instead
+ -- use OS_Time. These 3 declarations are intended for use only by consumers
+ -- of the GNAT.OS_Lib renaming of this package.
subtype time_t is Long_Long_Integer;
- -- C time_t can be either long or long long, but this is a subtype
- -- not used in the compiler or tools, but only for user
- -- applications, so we choose the Ada equivalent of the latter
- -- because eventually that will be the type used out of necessity.
- -- This may effect some user code on 32 bit targets that have not yet
- -- migrated to the Posix 2008 standard, particularly pre version 5
- -- 32 bit Linux.
+ -- C time_t can be either long or long long, but this is a subtype not used
+ -- in the compiler or tools, but only for user applications, so we choose
+ -- the Ada equivalent of the latter because eventually that will be the
+ -- type used out of necessity. This may affect some user code on 32-bit
+ -- targets that have not yet migrated to the Posix 2008 standard,
+ -- particularly pre version 5 32-bit Linux.
function To_C (Time : OS_Time) return time_t;
-- Convert OS_Time to C time_t type
diff --git a/gcc/ada/libgnat/s-parame.ads b/gcc/ada/libgnat/s-parame.ads
index 178bd7c..0f76a65 100644
--- a/gcc/ada/libgnat/s-parame.ads
+++ b/gcc/ada/libgnat/s-parame.ads
@@ -105,7 +105,7 @@ package System.Parameters is
------------------------------------
time_t_bits : constant := Long_Integer'Size;
- -- Number of bits in type time_t.
+ -- Number of bits in type time_t
----------------------------------------------
-- Characteristics of types in Interfaces.C --
diff --git a/gcc/ada/libgnat/s-parame__ae653.ads b/gcc/ada/libgnat/s-parame__ae653.ads
index 7682435..f838b41 100644
--- a/gcc/ada/libgnat/s-parame__ae653.ads
+++ b/gcc/ada/libgnat/s-parame__ae653.ads
@@ -105,7 +105,7 @@ package System.Parameters is
------------------------------------
time_t_bits : constant := Long_Integer'Size;
- -- Number of bits in type time_t.
+ -- Number of bits in type time_t
----------------------------------------------
-- Characteristics of types in Interfaces.C --
diff --git a/gcc/ada/libgnat/s-parame__hpux.ads b/gcc/ada/libgnat/s-parame__hpux.ads
index 053cd76..d6d4e10 100644
--- a/gcc/ada/libgnat/s-parame__hpux.ads
+++ b/gcc/ada/libgnat/s-parame__hpux.ads
@@ -103,7 +103,7 @@ package System.Parameters is
------------------------------------
time_t_bits : constant := Long_Integer'Size;
- -- Number of bits in type time_t.
+ -- Number of bits in type time_t
----------------------------------------------
-- Characteristics of Types in Interfaces.C --