FIX: D2030 Internal Compiler Error with /Ox

MORE INFORMATION

FORTRAN PowerStation, version 1.0, can be differentiated from the maintenance release, version 1.0a, by invoking the linker. Typing link32 | more from the \F32\BIN directory will show version 2.8 for FORTRAN PowerStation, version 1.0, and will show version 1.0f for the maintenance release, version 1.0a.

The following sample code illustrates this problem:

Sample Code

C compile options required: /Ox

      COMMON/FLOWED/QCURVE(1,3,26),NATUR
      DIMENSION DUMMYS(3,26)
 1800 IF(QCURVE(NATUR,2,I).GE.AA) THEN
        DUMMYS(3,K) = QCURVE(NATUR,3,I-1)
        IF(K.EQ.26) GO TO 1810
      ELSE
        I  = I + 1
      ENDIF
      GO TO 1800
 1810 DO 1850 I = 2,25
 1850   QCURVE(NATUR,3,I) = DUMMYS(3,I)
      END