[open-cobol-list] Internal Error

[Robert Sherry]

 

            When I compile the program below with the March Release of the Open Source COBOL Compiler, the compiler comes up with an internal error:

 

       ID DIVISION.

       PROGRAM-ID.      ADD1.

       ENVIRONMENT      DIVISION.

       CONFIGURATION SECTION.

       INPUT-OUTPUT SECTION.

       FILE-CONTROL.

       DATA DIVISION.

       FILE SECTION.

       WORKING-STORAGE SECTION.

 

        01 SIZE1 PIC 9(8) USAGE IS COMP-5

           VALUE IS 4.

        01 COUNTER-PTR USAGE IS POINTER.

       LINKAGE SECTION.

        01 COUNTER1 PIC 9(8) USAGE IS COMP.

       PROCEDURE DIVISION.

        SET COUNTER1 TO COUNTER-PTR.

 

The command use was:

cobc -x p12.cob

 

Here is what the compiler came back with:

typeck.c:2565: internal compiler error

Aborting compile of p12.cob at line 18

 

If I remove the set statement then the program then compiles with no problem.

 

Bob Sherry