Microsoft KB Archive/74899

= FIX: Erroneous F6099: Integer Overflow with $DEBUG =

Article ID: 74899

Article Last Modified on 12/1/2003

-

APPLIES TO


 * Microsoft FORTRAN Compiler 5.0
 * Microsoft FORTRAN Compiler 5.1
 * Microsoft FORTRAN Compiler 5.0
 * Microsoft FORTRAN Compiler 5.1

-



This article was previously published under Q74899



SYMPTOMS
The code below erroneously produces the following error when compiled with $DEBUG or /4Yb:

run-time error F6099: $DEBUG

- INTEGER overflow



RESOLUTION
Any one of the following will correct the error in the sample code:


 * 1) Comment out the common blocks. -or-


 * 1) Change the 16000s to 15999. -or-


 * 1) Remove one parameter in the write statement. -or-


 * 1) Substitute a 1 in place of ibeta in the WRITE statement. -or-


 * 1) Reduce the 8600s to smaller numbers. -or-


 * 1) Remove the $storage command. -or-


 * 1) Break the write statement into multiple write statements.



STATUS
Microsoft has confirmed this to be a bug in the products listed above. This problem was corrected in FORTRAN PowerStation, version 1.0.



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

Sample code
$debug $storage:2

dimension datsp1(16000), datsp2(16000) real*4 datsp1,datsp2

common /dd1/ datsp1 common /dd2/ datsp2

itabl=8600 iwyn=8600 idar=4321 ia=1 icarr=4615 ih=295 ixpxi=199 iy=197 ise=193 ibeta=1

write(*,*) datsp1(ibeta),datsp1(ise),datsp1(iy), & datsp1(ixpxi), datsp1(ih), datsp1(icarr), datsp2(ia), & datsp2(idar),datsp2(iwyn),datsp2(itabl) end

Additional query words: 5.00 5.10 buglist5.00 buglist5.10 fixlist1.00

Keywords: kbfix KB74899

-

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

© Microsoft Corporation. All rights reserved.