[Rd] Fortran (Was: Re: [R] linux compile options (64-bit))

[Prof Brian Ripley]

On Fri, 26 Aug 2005, Göran Broström wrote:

> On Tue, Aug 02, 2005 at 12:12:08PM +0200, Göran Broström wrote:
>> On Tue, Aug 02, 2005 at 10:58:31AM +0100, Prof Brian Ripley wrote:
>>
>>> The problems we are seeing with gcc4 are mainly (but not
>>> entirely) with gfortran: it seems not quite ready for production use.
>>> -4.0.1 is already a considerable improvement over -4.0.0.
>>>
>>> There is another project (www.g95.org) that is using a slightly different
>>> version of these sources, and either g95 or gfortran can be used with
>>> gcc3 if you want to use F95 sources.  However, F95 is unlikely to be
>>> suitable for use in distributed R packages for a long time to come.
>>
>> Thanks; I'll stick to 3.4.4(!) and f77 for the time being.
>
> One short follow-up question on the F77/95 theme: In my CRAN packages, I use
> the construct "do while ... end do" in my fortran sources. This is AFAIK not
> strict F77, but an extension in g77, and standard in F95. "-pedantic" does not
> complain about this; on the other hand "---it finds some non-ANSI
> practices, but not all" (from 'man g77').
>
> Should I rewrite the "do while...end do" parts? (Please answer NO!:)

There are compilers that do not accept that construct: AFAIR the Solaris 
f77 is one.  But, if no one is complaining I would leave it.  (We would 
not allow such things in base R, as inevitably it will cause problems on 
some rare platform.)

-- 
Brian D. Ripley,                  ripley at stats.ox.ac.uk
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595