c++: dependent conversion operator lookup [PR106179]
[official-gcc.git] / gcc / testsuite / gfortran.dg / boz_iand_2.f90
blobe656ac005c3f0692e59c66adc527f9f1ffc37678
1 ! { dg-do run }
2 program foo
3 integer :: k = 42
4 n = iand(k, z'3456'); if (n /= 2) stop 1
5 n = iand(z'1234', k); if (n /= 32) stop 2
6 n = and(k, z'3456'); if (n /= 2) stop 3
7 n = and(z'1234', k); if (n /= 32) stop 4
8 n = ieor(k, z'3456'); if (n /= 13436) stop 5
9 n = ieor(z'1234', k); if (n /= 4638) stop 6
10 n = xor(k, z'3456'); if (n /= 13436) stop 7
11 n = xor(z'1234', k); if (n /= 4638) stop 8
12 n = ior(k, z'3456'); if (n /= 13438) stop 9
13 n = ior(z'1234', k); if (n /= 4670) stop 10
14 n = or(k, z'3456'); if (n /= 13438) stop 11
15 n = or(z'1234', k); if (n /= 4670) stop 12
16 end program foo