[Bug fortran/41656] [OOP] Unresolved GENERIC

[sfilippone at uniroma2 dot it]

------- Comment #3 from sfilippone at uniroma2 dot it  2009-10-11 18:19 -------
(In reply to comment #2)
Hi Paul,
Seems to work as advertised, in that it takes out the errors it's supposed to
cure. 
On  my  full application I now get this:
psb_s_mat_mod.f03:1345.45:

      allocate(altmp, source=mold,stat=info) 
                                             1
Error: Using SOURCE= with a class variable at (1) not supported yet
psb_s_mat_mod.f03: In function ‘s_sizeof’:
psb_s_mat_mod.f03:152:0: error: case labels not sorted: 
case 1: is greater than case 1: but comes before it.
psb_s_mat_mod.f03:152:0: internal compiler error: verify_flow_info failed
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

The SOURCE= error is clear enough, but the other is interesting, because it
happens in one of the cases that gave rise to PR 41648, line 152 is the end of
this function
  function s_sizeof(a) result(res)
    implicit none 
    class(psb_s_sparse_mat), intent(in) :: a
    integer(psb_long_int_k_) :: res

    res = 0
    if (allocated(a%a)) then 
      res = a%a%sizeof()
    end if

  end function s_sizeof

Since you say you want to take them both.... 
do you need access to the full source code?

Regards
Salvatore


-- 


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