On 2009-04-27 09:01+0200 Arjen Markus wrote:

> [...]but subroutine exit() is not an official intrinsic subroutine.
> I think it is particular to gfortran/g77/g95.This could cause trouble
> for other compilers (or they may supply similar routines). I will have
> to check it (*), but I am not overly enthousiastic about such
> extensions, however common. (Fortran programs normally exit with a zero
> status anyway).
>
> Regards,
>
> Arjen
>
> (*) ifort under Linux accepts it as does my more or less ancient CVF
> compiler. Those are the non-GNU-decendent compilers I have easy access
> to. So I guess this will work ...

Yes it does. Here is why.

According to the Portland group documentation for their fortran compiler,
"exit" (to break out of loops) is part of the fortran 95 standard while 
"call exit(status)" (to stop the application with a status code) is a
VAX/VMS Fortran extension they support.

VAX/VMS Fortran was extremely common during the 80's so there is a lot of
legacy Fortran code around that uses those extensions such as "call
exit(status)".  Therefore, I think virtually every single Fortran compiler
(including gfortran, the Intel compiler, the Portland Group compiler, and
the CVF compiler from our joint knowledge) supports such extensions.

I believe the ubiquity of VAX/VMS Fortran support in present-day fortran
compilers is the reason we have never had any complaints about "call
exit(status)" that occurs throughout our f95 examples.  That is until
Geoffrey's bug report.  However the fundamental cause there turned out to be
due to a bug in the implementation of the VAX/VMS extension in an old
version of gfortran which Andrew has now worked around (assuming Geoffrey
verifies that workaround).

Alan
__________________________
Alan W. Irwin

Astronomical research affiliation with Department of Physics and Astronomy,
University of Victoria (astrowww.phys.uvic.ca).

Programming affiliations with the FreeEOS equation-of-state implementation
for stellar interiors (freeeos.sf.net); PLplot scientific plotting software
package (plplot.org); the libLASi project (unifont.org/lasi); the Loads of
Linux Links project (loll.sf.net); and the Linux Brochure Project
(lbproject.sf.net).
__________________________

Linux-powered Science
__________________________

------------------------------------------------------------------------------
Crystal Reports - New Free Runtime and 30 Day Trial
Check out the new simplified licensign option that enables unlimited
royalty-free distribution of the report engine for externally facing 
server and web deployment.
http://p.sf.net/sfu/businessobjects
_______________________________________________
Plplot-devel mailing list
Plplot-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/plplot-devel

Reply via email to