Microsoft KB Archive/86453

= FIX: F6099 w/ IAND in an IF Compiled w/ /4Yb and /Od =

Article ID: 86453

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 Q86453



SYMPTOMS
Programs compiled with the /4Yb (or the $DEBUG metacommand) and /Od switches in Microsoft FORTRAN versions 4.0, 4.01, 4.1, 5.0, and 5.1 under MS-DOS and versions 4.1, 5.0, and 5.1 under OS/2 and that contain an IAND function within an IF statement may incorrectly generate the following error:

Run-Time Error F6099: $DEBUG

INTEGER overflow

This error is generated if one of the parameters of the IAND function is a constant less than 255 and the other parameter is a variable greater than 32768.



CAUSE
The F6099 error occurs for constants less than 255 because the /4Yb compiler option (or the $DEBUG metacommand) causes the compiler to generate code for checking integer overflow in which an incorrect comparison is made on the low word of the variable stored in the AX register. A constant greater than 255 in the IAND function forces a comparison on the high word of the register, avoiding the generation of the incorrect overflow error.



RESOLUTION
To avoid this error, compile either without the /4Yb (or the $DEBUG metacommand) or the /Od compiler option.



STATUS
Microsoft has confirmed this to be a problem in FORTRAN versions 4.0, 4.01, 4.1, 5.0, and 5.1. This problem was corrected in FORTRAN PowerStation, version 1.0.



MORE INFORMATION
The following code can be used to reproduce the problem.

Sample Code 1
C Compile options needed: /Od

$debug integer*4 k     k=32768 if (iand(k, 1) .ne. 0) write(*, *) 'Not Equal to Zero' end

Additional query words: 4.00 4.10 5.00 5.10 buglist4.00 buglist4.01 buglist4.10 buglist5.00 buglist5.10 fixlist1.00

Keywords: kbfix KB86453

-

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

© Microsoft Corporation. All rights reserved.