$ cat shift-kind.f90
program main
implicit none
integer, dimension (3,3) :: a, b, w
integer(kind=2), dimension (3) :: sh2
integer(kind=1), dimension (3) :: sh1
integer, dimension(3) :: bo
integer :: i,j
a = reshape((/(i,i=1,9)/),shape(a))
sh1 = (/ -3, -1, 3 /)
sh2 = (/ -3, -1, 3 /)
bo = (/-999, -99, -9 /)
b = cshift(a, shift=sh1)
b = cshift(a, shift=sh2)
b = eoshift(a, shift=sh1)
b = eoshift(a, shift=sh1, boundary=bo)
b = eoshift(a, shift=sh2)
b = eoshift(a, shift=sh2, boundary=bo)
end program main
$ gfortran shift-kind.f90
/tmp/cceMvPmd.o(.text+0xa42): In function `MAIN__':
: undefined reference to `_gfortran_cshift1_1'
/tmp/cceMvPmd.o(.text+0xc82): In function `MAIN__':
: undefined reference to `_gfortran_cshift1_2'
/tmp/cceMvPmd.o(.text+0xed2): In function `MAIN__':
: undefined reference to `_gfortran_eoshift1_1'
/tmp/cceMvPmd.o(.text+0x11a2): In function `MAIN__':
: undefined reference to `_gfortran_eoshift3_1'
/tmp/cceMvPmd.o(.text+0x13f2): In function `MAIN__':
: undefined reference to `_gfortran_eoshift1_2'
/tmp/cceMvPmd.o(.text+0x16c2): In function `MAIN__':
: undefined reference to `_gfortran_eoshift3_2'
collect2: ld returned 1 exit status
--
Summary: missing kinds 1 and 2 for eoshift and cshift
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: tkoenig at gcc dot gnu dot org
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=22143
