http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56500
--- Comment #9 from Dominique d'Humieres <dominiq at lps dot ens.fr> 2013-03-18
12:16:59 UTC ---
> Yes. I hope this variant should work better (regtesting now):
It "works better", but still has regressions:
[macbook] f90/bug% gfc /opt/gcc/work/gcc/testsuite/gfortran.dg/proc_ptr_36.f90
/opt/gcc/work/gcc/testsuite/gfortran.dg/proc_ptr_36.f90:26.6:
pp => sub2
1
Error: Interface mismatch in procedure pointer assignment at (1): 'sub2' is not
a function
/opt/gcc/work/gcc/testsuite/gfortran.dg/proc_ptr_36.f90:29.7:
call s(pp, .true.)
1
Error: Interface mismatch in dummy procedure 'ss' at (1): 'pp' is not a
subroutine
/opt/gcc/work/gcc/testsuite/gfortran.dg/proc_ptr_36.f90:33.7:
call s(pp, .false.)
1
Error: Interface mismatch in dummy procedure 'ss' at (1): 'pp' is not a
subroutine
