Compilation error in mod_stderr.f90 (function real2ch)
Posted: Mon Jul 09, 2012 1:21 pm
Dear everyone,
I am trying to compile yambo (3.2.5, rev26) using the Intel compilers (v. 12.1.2) in parallel version.
In the part "making modules" of the make yambo interfaces command, I get the following error message:
mod_stderr.f90(232): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) ,
write(real2ch,'('
----------------------^
mod_stderr.f90(232): error #7094: Unmatched parentheses within a character format specifier. ['(']
write(real2ch,'('
--------------------^
compilation aborted for mod_stderr.f90 (code 1)
Taking a look at the code, the relevant function indeed seems to be missing something:
character(schlen) function real2ch(r)
!
real(SP), intent(in) :: r
character(schlen) :: fmt_
!
fmt_=gen_fmt(r_v=(/r/))
write(real2ch,'('
!
end function real2ch
How should the function be modified, or, in case the error lies somewhere else (i.e. might be system-specific), would anyone have any suggestions how to solve this?
Best wishes,
Mari Ijäs
Department of Applied Physics, Aalto University School of Sciences, Finland
I am trying to compile yambo (3.2.5, rev26) using the Intel compilers (v. 12.1.2) in parallel version.
In the part "making modules" of the make yambo interfaces command, I get the following error message:
mod_stderr.f90(232): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) ,
write(real2ch,'('
----------------------^
mod_stderr.f90(232): error #7094: Unmatched parentheses within a character format specifier. ['(']
write(real2ch,'('
--------------------^
compilation aborted for mod_stderr.f90 (code 1)
Taking a look at the code, the relevant function indeed seems to be missing something:
character(schlen) function real2ch(r)
!
real(SP), intent(in) :: r
character(schlen) :: fmt_
!
fmt_=gen_fmt(r_v=(/r/))
write(real2ch,'('
!
end function real2ch
How should the function be modified, or, in case the error lies somewhere else (i.e. might be system-specific), would anyone have any suggestions how to solve this?
Best wishes,
Mari Ijäs
Department of Applied Physics, Aalto University School of Sciences, Finland