Compiler fails to detect syntax error in STOP statement

The following test program contains a STOP statement with a composite I/O list instead of a string expression. The compiler does not catch this, and the result is access violations in the run time library at run time.

program stopbug
implicit none
integer iter
real x,f
!
iter = 0
x = 1.0
do
   iter = iter+1
   x = (x+2/x)/2
   if(abs(x*x-2.0) < 1e-7)exit
   if(iter > 5)stop 'Did not finish in ',iter,' iterations'  ! ** SYNTAX ERROR, not caught
end do
end program

mecej4

Thank you for the bug report which I have logged for action.

mecej4

This failure has now been fixed for the next release of FTN95 which I plan to make available later today.