This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [F03] OOP & polymorphism
Il giorno gio, 17/09/2009 alle 19.32 +0200, Janus Weil ha scritto:
> Salvatore,
>
> thanks for the continued bug reporting!
>
My pleasure :-)
> > gfortran -O3 -I.. -I. -I. -c psb_d_base_mat_mod.f03
> > psb_d_base_mat_mod.f03:608.10:
> >
> > call a%csget(imin,imax,nzout,b%ia,b%ja,b%val,info,&
> > 1
> > Error: VARIABLE attribute of 'a' conflicts with PROCEDURE attribute at
> >
> > psb_d_base_mat_mod.f03:614.10:
> >
> > call b%set_nzeros(nzin+nzout)
> > 1
> > Error: Syntax error in CALL statement at (1)
>
> Fixed by a hunk in gfc_match_call.
>
> After fixing this, I got another error in the same file, which I could
> repair by fixing some stuff in gfc_typename and gfc_compare_types.
>
> This file compiles now (with the attached patch), but on the next one
> I get trouble with allocatable scalar components (which are not yet
> implemented):
>
> gfortran-4.5 -O3 -I.. -I. -I. -c psb_mat_mod.f03
> psb_mat_mod.f03:9.51:
>
> class(psb_d_base_sparse_mat), allocatable :: a
> 1
> Error: Allocatable component at (1) must be an array
>
> While I have checked in a patch implementing allocatable scalars some
> time ago, components are still missing, cf.
>
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996
>
> Cheers,
> Janus
Ok, am on standby until the relevant pieces are in place.
Salvatore