------- Comment #4 from dominiq at lps dot ens dot fr  2007-09-27 13:59 -------
The patch fixes the test case on this PR, but gives ICE on several of my tests.
The simplest is:

program aint_anint_1

  implicit none

  real(8) :: s = 42.7D0, s1, s2

  s1 = aint(s)
!  s2 = aint(s, kind=4)

end program aint_anint_1

aint_anint_1_red.f90: In function 'MAIN__':
aint_anint_1_red.f90:1: internal compiler error: in
gfc_conv_intrinsic_function_args, at fortran/trans-intrinsic.c:188

Is not there some tests about the shape of the argument(s) missing?

Currently regtesting.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33568

Reply via email to