Plugins: Add label-text.h to CPPLIB_H so it will be installed [PR115288]
[official-gcc.git] / gcc / testsuite / gfortran.dg / intrinsic_size.f90
blob284c649bd80eeb5b6953698ab141106008c3040e
1 ! { dg-do compile }
3 ! Argument checking; dim and kind have to be scalar
5 ! PR fortran/33297
7 integer array(5), i1, i2
8 print *, size(array,(/i1,i2/)) ! { dg-error "must be a scalar" }
9 print *, size(array,i1,(/i1,i2/)) ! { dg-error "must be a scalar" }
10 end