From: Gary Dismukes Date: Mon, 14 Jun 2021 19:37:49 +0000 (-0400) Subject: [Ada] Typo corrections and minor reformatting X-Git-Tag: basepoints/gcc-13~6100 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=79b87fcf29cd100f15ae68bd74bf94830bf41564;p=thirdparty%2Fgcc.git [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. --- diff --git a/gcc/ada/libgnarl/s-osinte__vxworks.ads b/gcc/ada/libgnarl/s-osinte__vxworks.ads index 8b9c5bf7b480..a2d5620a03cd 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 4c279d563b51..2049e385f6cc 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 178bd7cf2a9a..0f76a6535bcf 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 76824351c912..f838b41d5b11 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 053cd764a8ad..d6d4e10e6025 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 --