xref: /llvm-project/flang/test/Lower/Intrinsics/ior.f90 (revision 4571f8aa05a1eb88532edfcf7e144633535d5e85)
1! RUN: bbc -emit-fir %s -o - | FileCheck %s
2! RUN: %flang_fc1 -emit-fir %s -o - | FileCheck %s
3
4! CHECK-LABEL: ior_test
5subroutine ior_test(a, b)
6  integer :: a, b
7  print *, ior(a, b)
8  ! CHECK: %{{[0-9]+}} = arith.ori %{{[0-9]+}}, %{{[0-9]+}} : i{{(8|16|32|64|128)}}
9end subroutine ior_test
10
11