https://gcc.gnu.org/bugzilla/show_bug.cgi?id=124040
Bug ID: 124040
Summary: ice on invalid code - ENTRY name USING non-data-item
Product: gcc
Version: 16.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: cobol
Assignee: unassigned at gcc dot gnu.org
Reporter: simonsobisch at gnu dot org
Target Milestone: ---
This bug was originally for GnuCOBOL, but thanks to godbolt a quick check with
"gcc master" to gcobol was possible - both have ice with nearly the same
messages :-)
----------------------
ID DIVISION.
program-id. TESTENTRY.
DATA DIVISION.
LINKAGE SECTION.
01 wFIELD01-L PIC XX value NULL.
PROCEDURE DIVISION.
*> ENTRY 'aaaa' USING wFIELD01-L.
ENTRY 'myENTRY01' USING 'xxxxxxxxxx'.
*> FOLLOWING STATEMENTS CAUSE SAME INTERNAL COMPILER ERROR
*> ENTRY 'myENTRY01' USING omitted .
*> ENTRY 'myENTRY01' USING by CONTENT 'jjjj' .
*> ENTRY 'myENTRY01' USING by REFERENCE 'jjjj' .
*> ENTRY 'myENTRY01' USING by REFERENCE wFIELD01-L 'aaaaa' omitted.
GOBACK.
