In xml.F / xml.f / xml/f90 , there is this code snippet:
Code: Select all
SUBROUTINE XML_TAG( tag, name, type, param, comment )
IMPLICIT NONE
CHARACTER (LEN=*) :: tag
CHARACTER (LEN=*),OPTIONAL :: name
CHARACTER (LEN=*),OPTIONAL :: type
CHARACTER (LEN=*),OPTIONAL :: param
CHARACTER (LEN=*),OPTIONAL :: comment
However, in xml.f , xml_writer.f , electron.f and main.f there
are lines like this:
CALL XML_CLOSE_TAG
which is wrong, I suppose. At least the gfortran compiler (4.1.2)
chokes on this and I solved this issue by replacing all occurences
of 'empty' calls of
CALL XML_CLOSE_TAG
by
CALL XML_CLOSE_TAG("")
And then gfortran compiles vasp like a charm!
Rob.
