A tale of three compilers

[Steve Kargl]

On Sat, Dec 04, 2004 at 07:12:26PM +0100, Paul Thomas wrote:
> In trying to develop a sparse matrix interface with automatic garbage 
> collection, I have run into a rather quirky part of fortran95.  gfortran, 
> g95 and Digital Fortran 6.0 all give different results for the code below.
> 
> gfortran gives:
> base%this%this=>base? F
> base%this%this=>? F
> base%this=>? T
> 
> g95 gives:
> base%this%this=>base? T
> base%this%this=>? F
> base%this=>? T
> 
> and Digital Fortran:
> base%this%this=>base? T
> base%this%this=>? T
> base%this=>? T                    !!
> 

If it makes you feel better, NAG's compiler gives

kargl[210] ./z
 base%this%this=>base? F
 base%this%this=>? T
 base%this=>? T

Looks like a post to c.l.f is in order.

-- 
Steve