coarray_41.f90: Add "-latomic" option if libatomic_available.
[official-gcc.git] / gcc / testsuite / gfortran.dg / minmaxloc_integer_kinds_1.f90
blobcbf84ec41bd634fbe3b2368e3119730d6191c296
1 ! { dg-do link }
2 ! PR 30415 - minloc and maxloc for integer kinds=1 and 2 were missing
3 ! Test case by Harald Anlauf
4 program gfcbug55
5 integer(kind=1) :: i1(4) = 1
6 integer(kind=2) :: i2(4) = 1
7 print *, minloc(i1), maxloc(i1)
8 print *, minloc(i2), maxloc(i2)
9 end program gfcbug55