Microsoft KB Archive/43068

= FIX: Intrinsic Functions in Substring Evaluation Fail =

Article ID: 43068

Article Last Modified on 12/1/2003

-

APPLIES TO


 * Microsoft FORTRAN Compiler 4.0
 * Microsoft FORTRAN Compiler 4.01
 * Microsoft FORTRAN Compiler 4.1
 * Microsoft FORTRAN Compiler 5.0
 * Microsoft FORTRAN Compiler 5.1
 * Microsoft FORTRAN Compiler 4.1
 * Microsoft FORTRAN Compiler 5.0
 * Microsoft FORTRAN Compiler 5.1

-



This article was previously published under Q43068



SYMPTOMS
An application developed in Microsoft FORTRAN that uses a complicated expression that involves intrinsic functions to calculate substring indexes generates incorrect results.



RESOLUTION
Simplify the expression used to specify the substring index by using one or more temporary variables to store intermediate results of the computation.



STATUS
Microsoft has confirmed this to be a problem in FORTRAN versions 4.0, 4.01, 4.1, 5.0 and 5.1 for MS-DOS and versions 4.1, 5.0, and 5.1 for OS/2. This problem was corrected in FORTRAN PowerStation.



MORE INFORMATION
The following program writes the string &quot;B&quot; to the display instead of the correct string &quot;BCDEF.&quot;

Sample Code
C Compiler options required: None

CHARACTER *20 A, B     B = 'ABCDEFGHIJKLMNOP' I = 2 J = 6 A = B(I:(I + IDIM(J, 2))) WRITE(*,*) A     END The following code demonstrates one solution to the problem.

Sample Code
C Compiler options required: None

PROGRAM STRING CHARACTER *20 A, B     B='ABCDEFGHIJKLMNOP' I = 2 J = 6 K = I + IDIM(J, 2) A = B(I:K) WRITE(*,*) A     END

Additional query words: 4.00 4.01 4.10 5.00 5.10

Keywords: kbfix KB43068

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.