FIX: L1103 and Initialization of Large Common Blocks

MS-DOS    | OS/2

The information in this article applies to:

• Microsoft FORTRAN for MS-DOS, versions 5.0 and 5.1
• Microsoft FORTRAN for OS/2, versions 5.0 and 5.1

SYMPTOMS

The program below causes the following linker error:

   fatal error L1103: attempt to access data outside segment bounds

RESOLUTION

The work-around is to initialize the arrays in the same order that they appear in the common block.

NOTE: It is also possible to generate an internal compiler error by making simple modifications to the source code mentioned above. However, the workaround, is the same: initialize arrays in the order they are defined in the common block. For an example, query on the following in this Knowledge Base:

   internal and compiler and error and F1001 and line and 185

STATUS

Microsoft has confirmed this to be a problem in FORTRAN version 5.0 and 5.1. This problem was corrected in FORTRAN PowerStation.

MORE INFORMATION

The following program demonstrates the linker error L1103:

C ============ FORTRAN SOURCE CODE == Fragment #1 ===============

      real*8    test1, test2

      common /test/ test1(1000,10), test2(100)

      data test2 /100*0/
      data test1 /10000*0/

      end

The workaround is to initialize the arrays in the order they appear in the common block, as shown below.

C ============ FORTRAN SOURCE CODE == Fragment #2 ===============

      real*8    test1, test2

      common /test/ test1(1000,10), test2(100)

      data test1 /10000*0/
      data test2 /100*0/

      end