https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119230
Bug ID: 119230
Summary: gcobol -fwhole-program causes link failure
Product: gcc
Version: 15.0
Status: UNCONFIRMED
Keywords: link-failure
Severity: normal
Priority: P3
Component: cobol
Assignee: unassigned at gcc dot gnu.org
Reporter: sjames at gcc dot gnu.org
Target Milestone: ---
a.cob:
```
IDENTIFICATION DIVISION.
PROGRAM-ID. CobolGreeting.
*>Program to display COBOL greetings
DATA DIVISION.
WORKING-STORAGE SECTION.
01 IterNum PIC 9 VALUE 5.
PROCEDURE DIVISION.
BeginProgram.
PERFORM DisplayGreeting IterNum TIMES.
STOP RUN.
DisplayGreeting.
DISPLAY "Greetings from COBOL".
```
```
$ gcobol a.cob -fwhole-program
/usr/lib/gcc/x86_64-pc-linux-gnu/15/../../../../x86_64-pc-linux-gnu/bin/ld:
/usr/lib/gcc/x86_64-pc-linux-gnu/15/../../../../lib64/Scrt1.o: in function
`_start':
(.text+0x17): undefined reference to `main'
collect2: error: ld returned 1 exit status
```
