c: Fix up pointer types to may_alias structures [PR114493]
[official-gcc.git] / gcc / testsuite / gfortran.dg / warn_conversion_10.f90
blobe7d0a3ce104420766f587c78e8c5ba9089fcc528
1 ! { dg-do compile }
2 ! { dg-options "-fno-range-check -Wconversion" }
3 ! PR 88298 - this used to warn unnecessarily. Original test case by
4 ! Harald Anlauf.
5 subroutine bug (j, js)
6 integer :: j, js(3,2)
7 js(:,:) = cshift (js(:,:), shift=j, dim=1)
8 end subroutine bug