OSDN Git Service

2008-03-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / eoshift.f90
1 ! { dg-do run }
2 ! PR 18958:  We used to segfault for eoshifting off the end of an array.
3 program main
4   character(len=20) line
5   write (line,'(2I4)') eoshift((/1, 3/), 3)
6 end program main