[Q-e-developers] PW/tools/pwi2xsf.f & PGI 12.2

[Tone Kokalj]

On Thu, 2012-03-08 at 21:25 +0000, Filippo Spiga wrote:
> Dear all, 
>   it seems that PGI 12.2 and the file PW/tools/pwi2xsf.f are not good
> friends. I got this error at compile time:
> 
> 
> make[2]: Entering directory
> `/ichec/home/staff/fspiga/QE/espresso/PW/tools'
> test -n "" && ( cd ../.. ; make -w  || exit 1) || :
> pgf77 -O3 -r8 -mp -c pwi2xsf.f
> PGFTN-S-0146-Expression must be character type (pwi2xsf.f: 475)

Awkward, because line 475 is: word = adjustl(word)
and the whole function looks like:


c     ----------------------------------------------------------------
      INTEGER function string_length(word)
c     trims the string from both sides and returns its trimmed length
c     ----------------------------------------------------------------
      CHARACTER word*(*)
      word          = adjustl(word)   ! line 475
      string_length = len_trim(word)
      RETURN
      END

No idea what would be problematic here?

Regards, Tone

-- 
Anton Kokalj
J. Stefan Institute, Jamova 39, 1000 Ljubljana, Slovenia 
(tel: +386-1-477-3523 // fax:+386-1-477-3822)

Please, if possible, avoid sending me Word or PowerPoint attachments.
See:  http://www.gnu.org/philosophy/no-word-attachments.html