------- Comment #6 from fxcoudert at gcc dot gnu dot org 2006-06-19 12:03 ------- CSHIFT has the same problem:
$ cat zero_cshift.f90 real :: tempn(1) tempn = 2.0 print *, cshift(tempn(2:),shift=1) end $ gfortran zero_cshift.f90 && ./a.out Floating point exception I believe the following functions may not be safe: EOSHIFT, PACK, RESHAPE, TRANSPOSE, UNPACK (and of course, SPREAD and CSHIFT). -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=27895