------- 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
