]> git.ipfire.org Git - thirdparty/gcc.git/commit
cobol: Don't display 0xFF HIGH-VALUE characters in testcases. [PR120251]
authorRobert Dubner <rdubner@symas.com>
Thu, 15 May 2025 16:01:12 +0000 (12:01 -0400)
committerRobert Dubner <rdubner@symas.com>
Tue, 29 Jul 2025 16:06:38 +0000 (12:06 -0400)
commit412994e3d304229f60ef3bc597c87bae4bfb4e22
tree0ff8158d96b7bbc3c542f3440fac47331c2334ae
parent5ce4d3e211d43d069d60fea8d53dab7115a235db
cobol: Don't display 0xFF HIGH-VALUE characters in testcases. [PR120251]

The tests were displaying 0xFF characters, and the resulting generated
output changed with the system locale.  The check_88 test was modified
so that the regex comparisons ignore those character positions. Two
of the other tests were changed to output hexadecimal rather than
character strings.

There is one new test, and the other inspect testcases were edited to
remove an unimportant back-apostrophe that had found its way into the
source code sequence number area.

gcc/testsuite/ChangeLog:

PR cobol/120251
* cobol.dg/group1/check_88.cob: Ignore characters above 0x80.
* cobol.dg/group2/ALLOCATE_Rule_8_OPTION_INITIALIZE_with_figconst.cob:
Output HIGH-VALUE as hex, rather than as characters.
* cobol.dg/group2/ALLOCATE_Rule_8_OPTION_INITIALIZE_with_figconst.out:
Likewise.
* cobol.dg/group2/INSPECT_CONVERTING_TO_figurative_constants.cob: Typo.
* cobol.dg/group2/INSPECT_CONVERTING_TO_figurative_constants.out: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_1.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_2.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_3.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_4.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_5-f.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_6.cob: Likewise.
* cobol.dg/group2/INSPECT_ISO_Example_7.cob: Likewise.
* cobol.dg/group2/Multiple_INDEXED_BY_variables_with_the_same_name.cob: New test.
* cobol.dg/group2/Multiple_INDEXED_BY_variables_with_the_same_name.out: New test.

(cherry picked from commit 022d8e25e49021b378a4e6c24c2f0c380a066690)
14 files changed:
gcc/testsuite/cobol.dg/group1/check_88.cob
gcc/testsuite/cobol.dg/group2/ALLOCATE_Rule_8_OPTION_INITIALIZE_with_figconst.cob
gcc/testsuite/cobol.dg/group2/ALLOCATE_Rule_8_OPTION_INITIALIZE_with_figconst.out
gcc/testsuite/cobol.dg/group2/INSPECT_CONVERTING_TO_figurative_constants.cob
gcc/testsuite/cobol.dg/group2/INSPECT_CONVERTING_TO_figurative_constants.out
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_1.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_2.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_3.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_4.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_5-f.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_6.cob
gcc/testsuite/cobol.dg/group2/INSPECT_ISO_Example_7.cob
gcc/testsuite/cobol.dg/group2/Multiple_INDEXED_BY_variables_with_the_same_name.cob [new file with mode: 0644]
gcc/testsuite/cobol.dg/group2/Multiple_INDEXED_BY_variables_with_the_same_name.out [new file with mode: 0644]