warning #6371: A jump into a block from outside the block may have occurred.

[milenko1976]

Well i have change my operational system from 64 to 32bit Ubuntu 10.04,downloaded new Intel compiler.The problem is that i get this:
ifort -c main.f
main.f(341): warning #6371: A jump into a block from outside the block may have occurred. [1000]
do 1000 is=1,nsource
---------^
main.f(631): error #6333: An unterminated If or DO statement exists.
1000 continue
^
compilation aborted for main.f (code 1)

I am not sure about flag options,or is it bug int he code?I didn't have any problems with this on my previous system.

[Ron_Green]

Well if the code has not changed, and I mean NO changes, then it could possibly be a bug. Could you attach main.f and any modules it uses? Attachment instructions are here:

http://software.intel.com/en-us/articles/how-to-attach-file-insert-code-into-forum-post/

[milenko1976]

OK
fd.com
timeinterp.f
timenearsrc.f
timelinear.f
timeinterp2d.f
stencils2d.f
sort.f
pass.f
model.f
misc.f
makefile
main.f
fside.f
fnode.f
findnode.f
findiff2d.f
find.f
expand.f
fd.par
blkdat.f

[Ron_Green]

I'm missing fp.par, could you attach that too please?

thanks

ron

[jimdempseyatthecove]

I think you commented out one or two endif's in main.f

make a copy of main.f

then from the copy start stripping out non-flow control lines that are not fully contained.

I get something like this:

[fxfortran]      do 1000 is=1,nsource
c
         if(istype.ne.1) then
c         else
           iys=int((ysource(is)-ymin)/size)+1
           ygrid=ymin+float(iys-1)*size
           if(abs(ygrid-ysource(is)).gt..001) then
             write(io,11)
11           format(/
     +       '***  source not on model grid in y direction  ***'/)
             go to 1000
c           end if
1000  continue
[/fxfortran]

Jim Dempsey

[milenko1976]

Thanks Jim.I will change this now.

[mecej4]

In retrospect, you should examine this statement in your starting post of this thread: "I didn't have any problems with this on my previous system."

If that statement is literally true, your "previous system" was seriously deficient and, therefore, any conclusions you drew from running programs on it should be viewed with suspicion.