------- Comment #3 from sje at cup dot hp dot com 2007-06-06 22:04 -------
Here is a cutdown test case, it looks like we have a roundoff difference
between the exponentiation done at compile time and the exponentiation done at
run time and thus a and b are not 'exactly the same'. Maybe we should use the
approximate check instead of the exact check in this case.
subroutine check_c4 (a, b)
complex(kind=4), intent(in) :: a, b
print *, a
print *, b
if (a /= b) call abort()
end subroutine check_c4
program test
complex(kind=4) :: c4
c4 = (1.0,0.2)
call check_c4(c4**9,(1.0,0.2)**9)
end program test
--
sje at cup dot hp dot com changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |sje at cup dot hp dot com
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31833
