FIX: SELECT CASE with /4I2 Creates Oversized .OBJ Module (68104)

The information in this article applies to:

Microsoft FORTRAN Compiler for MS-DOS 5.0
Microsoft FORTRAN Compiler for MS-DOS 5.1
Microsoft FORTRAN compiler for OS/2 5.0
Microsoft FORTRAN compiler for OS/2 5.1

This article was previously published under Q68104

SYMPTOMS

The FORTRAN compiler can create greatly oversized object modules when a program that uses the SELECT CASE statement is compiled with the /4I2 switch in the MS-DOS environment. When the same program is compiled under OS/2, the compiler appears to hang.

Because of the size of the object module, the following warnings are also generated when you compile with the /4I2 switch:

F4063: function too large for post-optimizer

L4020: code segment size exceeds 65500

The resulting executable can cause the machine to hang.

RESOLUTION

To avoid this problem, do not use the /4I2 compiler switch when you are compiling programs that use the SELECT CASE...END SELECT statement.

STATUS

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

MORE INFORMATION

When the following sample program is compiled with the /4I2 compiler switch under MS-DOS, the program produces an object file of over 160,000 bytes. Without the /4I2 switch, an object module of several hundred bytes is generated. An assembly listing of the program shows that the compiler generates repetitive lines of invalid code.

Sample Code

      select case (i)
             case (  :-3)
             case (-2: 0)
             case ( 1 )
             case ( 2 )
      end select
      end

Modification Type:	Major	Last Reviewed:	12/1/2003
Keywords:	kbfix KB68104