flang/test/Fir/select.fir

   1 // Test lowering FIR to LLVM IR of fir.select{|_rank|_case}
   2
   3 // RUN: tco %s | FileCheck %s
   4 // RUN: %flang_fc1 -emit-llvm %s -o - | FileCheck %s
   5
   6 // CHECK-LABEL: @f
   7 func.func @f(%a : i32) -> i32 {
   8    %1 = arith.constant 1 : i32
   9    %2 = arith.constant 42 : i32
  10 // CHECK: switch i32 %{{.*}}, label %{{.*}} [
  11 // CHECK:   i32 1, label %{{.*}}
  12 // CHECK: ]
  13    fir.select %a : i32 [1, ^bb2(%1:i32), unit, ^bb3(%2:i32)]
  14 ^bb2(%3 : i32) :
  15    return %3 : i32
  16 ^bb3(%4 : i32) :
  17    %5 = arith.addi %4, %4 : i32
  18    // CHECK: ret i32
  19    return %5 : i32
  20 }
  21
  22 // CHECK-LABEL: @g
  23 func.func @g(%a : i32) -> i32 {
  24    %1 = arith.constant 1 : i32
  25    %2 = arith.constant 42 : i32
  26
  27 // CHECK: switch i32 %{{.*}}, label %{{.*}} [
  28 // CHECK:  i32 1, label %{{.*}}
  29 // CHECK:  i32 -1, label %{{.*}}
  30 // CHECK: ]
  31    fir.select_rank %a : i32 [1, ^bb2(%1:i32), -1, ^bb4, unit, ^bb3(%2:i32)]
  32 ^bb2(%3 : i32) :
  33    return %3 : i32
  34 ^bb3(%4 : i32) :
  35    %5 = arith.addi %4, %4 : i32
  36    return %5 : i32
  37 ^bb4:
  38    // CHECK: ret i32
  39    return %a : i32
  40 }
  41
  42 // CHECK-LABEL: @h
  43 func.func @h(%a : i32) -> i32 {
  44    %1 = arith.constant 1 : i32
  45    %2 = arith.constant 42 : i32
  46    %b1 = arith.constant 4 : i32
  47    %b2 = arith.constant 14 : i32
  48    %b3 = arith.constant 82 : i32
  49    %b4 = arith.constant 96 : i32
  50    // CHECK-DAG: icmp eq i32 %{{.*}}, 1
  51    // CHECK-DAG: icmp sle i32 4, %{{.*}}
  52    // CHECK-DAG: icmp sle i32 %{{.*}}, 14
  53    // CHECK-DAG: icmp sle i32 82, %{{.*}}
  54    // CHECK-DAG: icmp sle i32 %{{.*}}, 96
  55    fir.select_case %a : i32 [#fir.point, %1, ^bb2(%1:i32), #fir.lower, %b1, ^bb4, #fir.upper, %b2, ^bb6, #fir.interval, %b3, %b4, ^bb5, unit, ^bb3(%2:i32)]
  56 ^bb2(%3 : i32) :
  57    return %3 : i32
  58 ^bb3(%4 : i32) :
  59    %5 = arith.addi %4, %4 : i32
  60    cf.br ^bb2(%5 : i32)
  61 ^bb4:
  62    return %a : i32
  63 ^bb5:
  64    return %1 : i32
  65 ^bb6:
  66    %x = arith.addi %b4, %b3 : i32
  67    // CHECK: ret i32
  68    return %x : i32
  69 }