RECURSIVE vs PURE and ELEMENTAL

Steve Kargl sgk@troutmask.apl.washington.edu
Sat Aug 4 04:42:00 GMT 2007


On Fri, Aug 03, 2007 at 09:09:07PM -0700, Steve Kargl wrote:
> 
> Thanks for the report.  Can you run 'gfortran --version' and
> report the output?
> 
> With no options, I get
> mobile:kargl[211] gfc4x -o z w.f90
> w.f90:26.8:
> 
>     r = factorial_inner (val * next, next - 1)
>        1
> Error: Function 'factorial_inner' at (1) cannot call itself, as it is
>        not RECURSIVE
> mobile:kargl[212] gfc4x --version
> GNU Fortran (GCC) 4.3.0 20070802 (experimental)
> 

If I change ELEMENTAL to RECURSIVE in the module. I get a 
type/rank mismatch, which I think is the correct error.

-- 
Steve



More information about the Fortran mailing list