[Patch, Fortran] RFC: Exit from non-loop constructs

[Daniel Kraft]

Daniel Kraft wrote:
> 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.

This is a new version, incorporating the comments of Mikael and with a 
fix to the line-number problem (by converting to fold_build3_loc in 
trans-stmt.c) thanks to Tobias.

Regtested on GNU/Linux-x86-32.  float128_1.f90 still failed, but this 
has probably nothing to with the patch (I can't image what it could). 
Ok for trunk?

Yours,
Daniel

-- 
http://www.pro-vegan.info/
--
Done:  Arc-Bar-Cav-Kni-Ran-Rog-Sam-Tou-Val-Wiz
To go: Hea-Mon-Pri
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: patch.changelog
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100902/234a0c0f/attachment.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: patch.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20100902/234a0c0f/attachment-0001.ksh>