[Bug-GnuCOBOL] cobc: codegen.c: 1124: internal compiler error using GnuCobol Version 3 Release 1 aunder MinGW

[Bruce Zupek]

Simon please find a compiler ending syntax below:
           CALL GlobalAlloc USING
                          BY VALUE ZERO.
It appears that a figurative constant used in a CALL statement Using BY VALUE clause trips the compiler.
I have attached a sample program  - TESTCLIP.COB
The first 2 statements within the Procedure Division illustrate the error.
 CALL GlobalAlloc USING
                  BY VALUE ZERO.
You can remove the offending statements and the program will compile and execute properly.
The compile parameters are indicated in the screenshot below.


Regards
Bruce Zupek

TESTCLIP.COB
Description: Text document