4 k
= dshiftl(z
'1234',z
'2345',1) ! { dg-error "cannot both be BOZ" }
5 n
= dshiftr(z
'1234',z
'2345',1) ! { dg-error "cannot both be BOZ" }
7 k
= dshiftl(z
'1234',3.1415,1) ! { dg-error "must be INTEGER" }
8 n
= dshiftr(2.7362,z
'2345',1) ! { dg-error "must be INTEGER" }