[DebugInfo][RemoveDIs] Emulate inserting insts in dbg.value sequences (#73350)
[llvm-project.git] / flang / test / Lower / character-compare.f90
blobe3587cdf11e0262906ea4ff5b6457c369ebb9711
1 ! RUN: bbc %s -o - | FileCheck %s
3 ! CHECK-LABEL: compare
4 subroutine compare(x, c1, c2)
5 character(len=4) c1, c2
6 logical x
7 ! CHECK: %[[RES:.*]] = fir.call @_FortranACharacterCompareScalar1
8 ! CHECK: cmpi slt, %[[RES]],
9 x = c1 < c2
10 end subroutine compare