To all:
Here is another case that cause problems with some compilers:
character*5 a
call test(a,'123')
print *,a
end
subroutine test(a,b)
! the problem statement is the IMPLICIT
implicit character(*) (a-z)
a = b
end
The problematic statement is the IMPLICIT CHARACTER(*). I think this
was prohibited in Fortran 77, but in Fortran 95 ?
Thanks in advance,
Jean Vezina
|