Dear all,

I try to compile siesta2.0 on a single machine under suse10.1, with
2 dual core EM64T chips (64bit xeon), using a g95 compiler.
I get an error in  the wxml directory.
In the following I give an extract of my arch.make and the error from the compiler.

Any idea is welcome !
Claire


>>>>  Here is an extract of  my arch.make file
-------------------------------------------------------------------
.SUFFIXES:
.SUFFIXES: .f .F .o .a .f90 .F90

SIESTA_ARCH=x86_64-unknown-linux-gnu--unknown

FPP=
FPP_OUTPUT=
FC=g95
RANLIB=ranlib

SYS=nag

SP_KIND=4
DP_KIND=8
KINDS=$(SP_KIND) $(DP_KIND)

FFLAGS= -g  -O2
FPPFLAGS= -DFC_HAVE_FLUSH -DFC_HAVE_ABORT
LDFLAGS=

ARFLAGS_EXTRA=

FCFLAGS_fixed_f=
FCFLAGS_free_f90=
FPPFLAGS_fixed_F=
FPPFLAGS_free_F90=

BLAS_LIBS=libblas.a
LAPACK_LIBS=dc_lapack.a liblapack.a
BLACS_LIBS=
SCALAPACK_LIBS=

COMP_LIBS=dc_lapack.a liblapack.a libblas.a

NETCDF_LIBS=

LIBS=$(SCALAPACK_LIBS) $(BLACS_LIBS) $(LAPACK_LIBS) $(BLAS_LIBS) $(NETCDF_LIBS)

#SIESTA needs an F90 interface to MPI
#This will give you SIESTA's own implementation
#If your compiler vendor offers an alternative, you may change
#to it here.
MPI_INTERFACE=
MPI_INCLUDE=

-------------------------------------------------------------------

>>>> Here is the error from the compiler when I ype "make"

-------------------------------------------------------------------
Compilation architecture to be used: x86_64-unknown-linux-gnu--unknown
If this is not what you want, create the right
arch.make file using the models in Sys

Hit ^C to abort...

==> Incorporating information about present compilation (compiler and flags)
make[1]: Entering directory `/home/cloison/Softwares/Siesta/siesta-2.0/Src'
g95 -c -g  -O2  -DFC_HAVE_FLUSH -DFC_HAVE_ABORT  compinfo.F90
make[1]: Leaving directory `/home/cloison/Softwares/Siesta/siesta-2.0/Src'
[EMAIL PROTECTED] -f compinfo.F90

(cd wxml ; make module)
make[1]: Entering directory `/home/cloison/Softwares/Siesta/siesta-2.0/Src/wxml'
g95 -c -g  -O2    m_wxml_core.f90
In file m_wxml_core.f90:88

allocate(xf%filename(len(filename)))
                       1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:249

     if ((len(xf%buffer) + len_trim(pcdata) + 1) > COLUMNS ) then
             1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:254

endif
  1
Error: Expecting END SUBROUTINE statement at (1)
In file m_wxml_core.f90:299

  if (len(xf%dict) > 0) call write_attributes(xf)
         1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:362

indent_level = max(len(xf%stack) - 1, 0)
                     1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:398

  if (len(xf%dict) > 0)  call write_attributes(xf)
         1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:412

do i = 1, len(xf%dict)
            1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:416

  if ((len(xf%buffer) + size) > COLUMNS) call add_eol(xf)
          1
Error: Symbol 'len' at (1) is defined in multiple modules
In file m_wxml_core.f90:423

enddo
  1
Error: Expecting END SUBROUTINE statement at (1)
In file m_wxml_core.f90:434

     if (len(xf%buffer) > 0) call dump_buffer(xf,lf=.true.)
            1
Error: Symbol 'len' at (1) is defined in multiple modules
Fatal Error: Too many errors, aborting.
make[1]: *** [m_wxml_core.o] Error 1
make[1]: Leaving directory `/home/cloison/Softwares/Siesta/siesta-2.0/Src/wxml'
make: *** [libwxml.a] Error 2
-------------------------------------------------------------------

Reply via email to