Hi,

the attached patch implements the Fortran 2008 feature of EXITs from 
non-loop named constructs (like IF or BLOCK).  It seems to work 
basically, but I'd like to get some input.

In particular, the two things marked XXX in the patch -- what do you 
think about those?  (Both things are basically "boolean":  I see two 
possible approaches, and just need to find out which one is the "correct".)

This patch regtests nearly fine on GNU/Linux-x86-32, but float128_1.f90 
fails ("Kind 16 not supported.") -- I've no idea what's going wrong 
there on my system, but it is probably not related.

However, I also see a failure for gfortran.dg/gomp/pr41344.f:  It seems 
to be that the error that is expected on line 10 appears on line 7 
instead.  This is probably caused by my patch, although I have no idea 
what the problem could be...  Any ideas?  As this seems to be a 
middle-end error, I'm particular at a loss.  Maybe I can work this out 
tomorrow myself, but I'd appreciate any thoughts.

I'm not asking for review yet, but will resubmit a new patch when the 
issues mentioned above are cleared.

Yours,
Daniel

-- 
http://www.pro-vegan.info/
--
Done:  Arc-Bar-Cav-Kni-Ran-Rog-Sam-Tou-Val-Wiz
To go: Hea-Mon-Pri