https://gcc.gnu.org/bugzilla/show_bug.cgi?id=119809
Bug ID: 119809
Summary: FE internal_error internal compiler error: in
digits_from_float128, at cobol/genapi.cc:15293 (bit
data items)
Product: gcc
Version: 15.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: cobol
Assignee: unassigned at gcc dot gnu.org
Reporter: simonsobisch at gnu dot org
Target Milestone: ---
bacxktrace
0x25f146f internal_error(char const*, ...)
/home/so/gcc-cobol/gcc/diagnostic-global-context.cc:517
0xa83577 fancy_abort(char const*, int, char const*)
/home/so/gcc-cobol/gcc/diagnostic.cc:1749
0xaead7c digits_from_float128
/home/so/gcc-cobol/gcc/cobol/genapi.cc:15293
0xaf0593 initial_from_float128
/home/so/gcc-cobol/gcc/cobol/genapi.cc:15654
0xaf0593 parser_symbol_add(cbl_field_t*)
/home/so/gcc-cobol/gcc/cobol/genapi.cc:16778
0xbd20f7 symbols_update(unsigned long, bool)
/home/so/gcc-cobol/gcc/cobol/symbols.cc:1853
0xb0df8d data_division_ready
/home/so/gcc-cobol/gcc/cobol/parse_ante.h:3231
0xb15168 yyparse()
/home/so/gcc-cobol/gcc/cobol/parse.y:1380
0xbdd639 parse_file
/home/so/gcc-cobol/gcc/cobol/util.cc:2130
0xbdd639 cobol_parse_files(int, char const**)
/home/so/gcc-cobol/gcc/cobol/util.cc:2191
to reproduce just try to compile
identification division.
program-id. fbug.
data division.
working-storage section.
01 fld1.
05 fxx pic 1(1) value 0.
procedure division.
goback
.
