[Bug cobol/126390] New: ICE: in encode_numeric, at cobol/util.cc:1509

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=126390

            Bug ID: 126390
           Summary: ICE: in encode_numeric, at cobol/util.cc:1509
           Product: gcc
           Version: 17.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: cobol
          Assignee: unassigned at gcc dot gnu.org
          Reporter: simonsobisch at gnu dot org
  Target Milestone: ---

While I can't share a reproducer I can share the issue:


cobol1: internal compiler error: in encode_numeric, at cobol/util.cc:1509
0x26bf075 internal_error(char const*, ...)
        /home/so/gcc-cobol/gcc/diagnostic-global-context.cc:787
0xa5cdf5 fancy_abort(char const*, int, char const*)
        /home/so/gcc-cobol/gcc/diagnostics/context.cc:1813
0xbabbe0 cbl_field_t::encode_numeric(char const*, cbl_loc_t)
        /home/so/gcc-cobol/gcc/cobol/util.cc:1509
0xb8fafd new_literal_float(cbl_loc_t const&, char const*)
        /home/so/gcc-cobol/gcc/cobol/symbols.cc:4133
0xb1c48f yyparse()
        /home/so/gcc-cobol/gcc/cobol/parse.y:8224
0xbaccd4 parse_file
        /home/so/gcc-cobol/gcc/cobol/util.cc:3830
0xbaccd4 cobol_parse_files(int, char const**)
        /home/so/gcc-cobol/gcc/cobol/util.cc:3885