]> 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>
Thu, 15 May 2025 16:02:54 +0000 (12:02 -0400)
commit022d8e25e49021b378a4e6c24c2f0c380a066690
treecd5743c2b6ce07b95dd3ebf5092a0565275fcc41
parent0babc6f29f7c29215674b3ee58d5dd17ce7b3849
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.
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]