From: Ronan Desplanques Date: Mon, 18 Nov 2024 13:44:39 +0000 (+0100) Subject: ada: Fix documentation comment for Scan_Sign X-Git-Tag: basepoints/gcc-16~3412 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=80619590329b566f793405a7d5b7a8e78b07da6f;p=thirdparty%2Fgcc.git ada: Fix documentation comment for Scan_Sign This patches fixes a couple of details that were wrong in the documentation comment for System.Val_Util.Scan_Sign. gcc/ada/ChangeLog: * libgnat/s-valuti.ads (Scan_Sign): Fix documentation comment. --- diff --git a/gcc/ada/libgnat/s-valuti.ads b/gcc/ada/libgnat/s-valuti.ads index 6f91c363a43d..7963245377b2 100644 --- a/gcc/ada/libgnat/s-valuti.ads +++ b/gcc/ada/libgnat/s-valuti.ads @@ -121,13 +121,12 @@ is -- string to be scanned starting at Ptr.all, and Max is the index of the -- last character in the string). Scan_Sign first scans out any initial -- blanks, raising Constraint_Error if the field is all blank. It then - -- checks for and skips an initial plus or minus, requiring a non-blank - -- character to follow (Constraint_Error is raised if plus or minus appears - -- at the end of the string or with a following blank). Minus is set True - -- if a minus sign was skipped, and False otherwise. On exit Ptr.all points - -- to the character after the sign, or to the first non-blank character - -- if no sign is present. Start is set to the point to the first non-blank - -- character (sign or digit after it). + -- checks for and skips an initial plus or minus (Constraint_Error is + -- raised if plus or minus appears at the end of the string). Minus is set + -- True if a minus sign was skipped, and False otherwise. On exit Ptr.all + -- points to the character after the sign, or to the first non-blank + -- character if no sign is present. Start is set to the point to the first + -- non-blank character. -- -- Note: if Str is null, i.e. if Max is less than Ptr, then this is a -- special case of an all-blank string, and Ptr is unchanged, and hence