Re: Modules and linking

[Janus Weil <janus at gcc dot gnu dot org>]

Hi Salvatore,

> I am seeing something new which looks related to the recent work in
> module name mangling:

just to clarify: What we changed recently was the naming scheme of the
internal class symbols (i.e. class containers, vtabs, vtypes, etc).
But your problem looks like it could be due to the recent addition of
copying procedures for polymorphic type, which are used for ALLOCATE
with SOURCE ...


> mpif90 ppde.o ?data_input.o -o ppde -L../../lib ?-lmld_prec
> -L/home/sfilippo/NUMERICAL/NewPSBLAS/psblas3-dev/lib/ -lpsb_krylov
> -lpsb_prec ?-lpsb_util ?-lpsb_base ? ?-llapack -lcblas -lf77blas -latlas
> -lmetis -L/usr/local/LIB/gnu46/lib -L/usr/local/metis/gnu46/
> /home/sfilippo/NUMERICAL/NewPSBLAS/psblas3-dev/lib//libpsb_base.a(psb_z_linmap_mod.o): In function `__copy_psb_descriptor_type_psb_desc_type_':
> /home/sfilippo/NUMERICAL/NewPSBLAS/psblas3-dev/base/modules/psb_z_linmap_mod.f90:233: multiple definition of `__copy_psb_descriptor_type_psb_desc_type_'
> /home/sfilippo/NUMERICAL/NewPSBLAS/psblas3-dev/lib//libpsb_base.a(psb_c_linmap_mod.o):/home/sfilippo/NUMERICAL/NewPSBLAS/psblas3-dev/base/modules/psb_c_linmap_mod.f90:231: first defined here


The symbol `__copy_psb_descriptor_type_psb_desc_type_' is such a
copying procedure. My guess is that this routine belongs to a type
called 'psb_desc_type', defined in a module called
'psb_descriptor_type'. Is this possible?

However, I don't see off-hand why you get this symbols twice.


> Is it worth trying to cut a test case, or is it something obviously
> wrong on my part?

In principle yes, but you might also wait a bit, since I'm about to do
some more changes on the internal naming scheme, which might already
solve this.

Btw, I recently tried to compile the alpha2 version of PSBLAS 3 with
gfortran trunk, which worked just fine ...

Cheers,
Janus