[Bug fortran/40737] Pointer references sometimes fail to define "span" symbols
dh458 at oakapple dot net
gcc-bugzilla@gcc.gnu.org
Tue Jul 21 15:19:00 GMT 2009
------- Comment #4 from dh458 at oakapple dot net 2009-07-21 15:19 -------
(In reply to comment #0)
In the original SPECmpi source code,
I was able to make the compile-time bug go away with this source workaround:
change e.g.
Ro => Hydro_vars( first_cell:last_cell, j, k)%cell_var( ro_var)
to
tRo => Hydro_vars( first_cell:last_cell, j, k)%cell_var( ro_var)
call copy_pointer(Ro, tRo)
with earlier declarations for tRo and copy_pointer
< subroutine copy_pointer(p, q)
<
< use TF_NUMBER_KIND
<
< implicit none
< real(r8), pointer, dimension( :) :: p, q
<
< p => q
< return
<
< end subroutine
< use TF_NUMBER_KIND
<
< implicit none
<
< real(r8), pointer, dimension( :),save :: tRo
However execution was unsuccessful, though not necessarily due to a problem
in this part of the code. Compilation and execution of this modified
code were successful on
the same linux system using Sun Studio 12u1, but not using gfortran 4.4.0
on a sparc solaris system... so the root cause of failure is unknown.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40737
More information about the Gcc-bugs
mailing list