http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60359

--- Comment #3 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Thu, Feb 27, 2014 at 11:47:13PM +0000, antony at cosmologist dot info wrote:
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60359
> 
> --- Comment #2 from Antony Lewis <antony at cosmologist dot info> ---
> This was reduced already, but actually wasn't too hard to find something much
> simpler- just this:
> 
>     module IO

>     implicit none
> 
>     contains
> 
>     subroutine FWRite(S)
>     class(*) :: S
>     end subroutine FWrite
> 
>     subroutine IO_OutputMargeStats()
>     character(LEN=128) tag
> 
>     call FWrite('  '//tag)
>     call FWrite('   '//tag)
> 
>     end subroutine IO_OutputMargeStats
>     end module IO
> 

Thanks!  I had identified the issue with with F%Write in IO.f90,
but still have 5000 lines to eliminate to get to the above.
Unfortunately, I know zero about gfortran's class(*) implementation.

Reply via email to