https://gcc.gnu.org/g:7ddf78f87db79d8e10d811e1fb8a1af66dfcb703
commit r17-4013-g7ddf78f87db79d8e10d811e1fb8a1af66dfcb703 Author: James K. Lowden <[email protected]> Date: Tue Sep 8 11:41:40 2026 -0400 cobol: Update manual. Clarify use of literals and improve presentation of intrinsic functions. gcc/cobol/ChangeLog: * gcobol.1: Update description of BY CONTENT and Intrinsics. Diff: --- gcc/cobol/gcobol.1 | 110 ++++++++++++++++++++++++++++------------------------- 1 file changed, 58 insertions(+), 52 deletions(-) diff --git a/gcc/cobol/gcobol.1 b/gcc/cobol/gcobol.1 index 0998a5873358..14888d1ece7a 100644 --- a/gcc/cobol/gcobol.1 +++ b/gcc/cobol/gcobol.1 @@ -618,7 +618,9 @@ features may be enabled as a warning, or error, or suppressed. .It Fl Wno-apply-commit Warn if APPLY COMMIT is used. .It Fl Wno-content-expr -Warn if an expression is a BY CONTENT parameter. +Warn if an expression is a BY CONTENT parameter. This subsumes IBM +syntax supporting LENGTH of and ADDRESS OF as valid BY CONTENT +arguments. .It Fl Wno-bad-line-directive Warn if malformed .Ql #line @@ -632,10 +634,14 @@ Warn if BINARY-LONG-LONG is used. .It Fl Wno-call-fd Warn if CALL with FD parameter is used. This feature is currently unimplemented. -.It Fl Wno-call_giving +.It Fl Wno-call-giving Warn if CALL ... GIVING is used. -.It Fl Wno-call_literal -Warn if CALL is used is used with a literal parameter by reference. +.It Fl Wno-call-literal +Warn if CALL is used is used with a literal parameter by +reference. Validation applies not only to alphanumeric and national +literals, but to +.Dq "named literals" : +01 constants, 78 constants, and strings defined by the CDF. .It Fl Wno-cdf-dollar Warn if CDF \[Do]IF is used. .It Fl Wno-comp-6 @@ -1741,58 +1747,58 @@ To test a feature-set variable, use .Nm implements all intrinsic functions defined by \*[isostd], plus a few others. They are listed alphabetically below. -.Bl -item -compact -.It +.Bl -tag -width 2n -compact +.It A ABS ACOS ANNUITY ASIN ATAN -.It -BASECONVERT \%BIT-OF \%BIT-TO-CHAR \%BOOLEAN-OF-INTEGER \%BYTE-LENGTH -.It -CHAR \%CHAR-NATIONAL \%COMBINED-DATETIME CONCAT CONVERT COS \%CURRENT-DATE -.It -\%DATE-OF-INTEGER \%DATE-TO-YYYYMMDD \%DAY-OF-INTEGER \%DAY-TO-YYYYDDD \%DISPLAY-OF -.It -E \%EXCEPTION-FILE -\%EXCEPTION-FILE-N \%EXCEPTION-LOCATION \%EXCEPTION-LOCATION-N -\%EXCEPTION-STATEMENT \%EXCEPTION-STATUS EXP EXP10 -.It -FACTORIAL \%FIND-STRING -\%FORMATTED-CURRENT-DATE \%FORMATTED-DATE \%FORMATTED-DATETIME -\%FORMATTED-TIME \%FRACTION-PART -.It -\%HEX-OF \%HEX-TO-CHAR \%HIGHEST-ALGEBRAIC -.It -INTEGER \%INTEGER-OF-BOOLEAN \%INTEGER-OF-DATE \%INTEGER-OF-DAY -\%INTEGER-OF-FORMATTED-DATE \%INTEGER-PART -.It -LENGTH \%LOCALE-COMPARE -\%LOCALE-DATE \%LOCALE-TIME \%LOCALE-TIME-FROM-SECONDS LOG LOG10 \%LOWER-CASE -\%LOWEST-ALGEBRAIC -.It -MAX MEAN MEDIAN MIDRANGE MIN MOD \%MODULE-NAME -.It -\%NATIONAL-OF NUMVAL \%NUMVAL-C \%NUMVAL-F ORD -.It -\%ORD-MAX \%ORD-MIN -.It -PI \%PRESENT-VALUE -.It +.It B +BASECONVERT BIT-OF BIT-TO-CHAR BOOLEAN-OF-INTEGER BYTE-LENGTH +.It C +CHAR CHAR-NATIONAL COMBINED-DATETIME CONCAT CONVERT COS CURRENT-DATE +.It D +DATE-OF-INTEGER DATE-TO-YYYYMMDD DAY-OF-INTEGER DAY-TO-YYYYDDD DISPLAY-OF +.It E +E EXCEPTION-FILE +EXCEPTION-FILE-N EXCEPTION-LOCATION EXCEPTION-LOCATION-N +EXCEPTION-STATEMENT EXCEPTION-STATUS EXP EXP10 +.It F +FACTORIAL FIND-STRING +FORMATTED-CURRENT-DATE FORMATTED-DATE FORMATTED-DATETIME +FORMATTED-TIME FRACTION-PART +.It H +HEX-OF HEX-TO-CHAR HIGHEST-ALGEBRAIC +.It I +INTEGER INTEGER-OF-BOOLEAN INTEGER-OF-DATE INTEGER-OF-DAY +INTEGER-OF-FORMATTED-DATE INTEGER-PART +.It L +LENGTH LOCALE-COMPARE +LOCALE-DATE LOCALE-TIME LOCALE-TIME-FROM-SECONDS LOG LOG10 LOWER-CASE +LOWEST-ALGEBRAIC +.It M +MAX MEAN MEDIAN MIDRANGE MIN MOD MODULE-NAME +.It N +NATIONAL-OF NUMVAL NUMVAL-C NUMVAL-F ORD +.It O +ORD-MAX ORD-MIN +.It P +PI PRESENT-VALUE +.It R RANDOM RANGE REM REVERSE -.It -\%SECONDS-FROM-FORMATTED-TIME -\%SECONDS-PAST-MIDNIGHT SIGN SIN \%SMALLEST-ALGEBRAIC SQRT -\%STANDARD-COMPARE \%STANDARD-DEVIATION SUBSTITUTE SUM -.It -TAN \%TEST-DATE-YYYYMMDD \%TEST-DAY-YYYYDDD \%TEST-FORMATTED-DATETIME -\%TEST-NUMVAL \%TEST-NUMVAL-C \%TEST-NUMVAL-F TRIM -.It -ULENGTH UPOS \%UPPER-CASE +.It S +SECONDS-FROM-FORMATTED-TIME +SECONDS-PAST-MIDNIGHT SIGN SIN SMALLEST-ALGEBRAIC SQRT +STANDARD-COMPARE STANDARD-DEVIATION SUBSTITUTE SUM +.It T +TAN TEST-DATE-YYYYMMDD TEST-DAY-YYYYDDD TEST-FORMATTED-DATETIME +TEST-NUMVAL TEST-NUMVAL-C TEST-NUMVAL-F TRIM +.It U +ULENGTH UPOS UPPER-CASE USUBSTR USUPPLEMENTARY UUID4 UVALID UWIDTH -.It +.It V VARIANCE -.It -\%WHEN-COMPILED -.It -\%YEAR-TO-YYYY +.It W +WHEN-COMPILED +.It Y +YEAR-TO-YYYY .El . .Ss Binary floating point DISPLAY
