https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119825
Bug ID: 119825
Summary: gcobol XML generate forces bug report
Product: gcc
Version: 15.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: cobol
Assignee: unassigned at gcc dot gnu.org
Reporter: mickey1956 at comcast dot net
Target Milestone: ---
XML Generate statement , should not abend, if not implemented should say so.
gcobol produces segmentation fault
Identification division.
Program-id. XGFXg2.
Data division.
Working-storage section.
01 numItems pic 99 global.
01 purchaseOrder global.
05 orderDate pic x(10).
05 shipTo.
10 country pic xx value 'US'.
05 billTo.
10 name pic x(30).
05 orderComment pic x(80).
05 items occurs 0 to 20 times depending on numItems.
10 item.
15 partNum pic x(6).
01 numChars comp pic 999.
01 xmlPO pic x(999).
Procedure division.
m.
Move 'Robert Smith' to name of billTo
Xml generate xmlPO from purchaseOrder count in numChars
with xml-declaration with attributes
namespace 'http://www.example.com' namespace-prefix 'po'
Goback
.
---
mickeyw@pop-os:~/cbl$ gcobol -o xg2o XGFXg2.cbl
cobol1: internal compiler error: Segmentation fault
0x7e56ec84251f ???
./signal/../sysdeps/unix/sysv/linux/x86_64/libc_sigaction.c:0
0x7e56ec99a217 ???
../sysdeps/x86_64/multiarch/strcmp-sse42.S:269
0x7e56ec829d8f __libc_start_call_main
../sysdeps/nptl/libc_start_call_main.h:58
0x7e56ec829e3f __libc_start_main_impl
../csu/libc-start.c:392
Please submit a full bug report, with preprocessed source (by using
-freport-bug).
Please include the complete backtrace with any bug report.
See <https://gcc.gnu.org/bugs/> for instructions.
mickeyw@pop-os:~/cbl$
