#1202 PG + RANDOM / MOD: non-standard sample, missing standard note
Maybe something @dilodilo can have a look at...
The chapter 8.1.79 RANDOM misses an important information: standard COBOL requires the optional seed argument to be of class numeric.
GnuCOBOL has an extension that if that rule is not met it internally calls FUNCTION NUMVAL on the given argument and passes that as a seed.
To not mislead people I'd suggest the example following the description to have an explicit FUNCTION-NUMVAL or a different source (most portable: a numeric item that gets its value from ACCEPT FROM DATE).
With a "quick glance" on the chapter it somehow "felt" a bit confusing, maybe reordering/rewording would help? If nothing comes up during editing feel free to leave the rest as-is as I can't directly say what was confusing.
Similar in chapter 8.1.58 MOD which says "Either (or both) may have a non-integer value." - that part is an extension, the standard defines
1) Argument-1 and argument-2 shall be integers.
2) The value of argument-2 shall not be zero
Note: If that rule isn't matched GnuCOBOL will internally change the arguments to have the same "scale" and ignore the decimal [e.g. if arg-1 is 1.234 and arg-2 is 0.5 GnuCOBOL will calculate 1234 / 500], but that isn't portable.
Diff:
Diff:
I have adjusted text per your request However if you feal it still is not correct please provide EXACT Text to replace existing.