114 lines · plain
1// RUN: fir-opt --cse -split-input-file %s | FileCheck %s2 3// Check that the redundant fir.load is removed.4func.func @fun(%arg0: !fir.ref<i64>) -> i64 {5 %0 = fir.load %arg0 : !fir.ref<i64>6 %1 = fir.load %arg0 : !fir.ref<i64>7 %2 = arith.addi %0, %1 : i648 return %2 : i649}10 11// CHECK-LABEL: func @fun12// CHECK-NEXT: %[[LOAD:.*]] = fir.load %{{.*}} : !fir.ref<i64>13// CHECK-NEXT: %{{.*}} = arith.addi %[[LOAD]], %[[LOAD]] : i6414 15// -----16 17// CHECK-LABEL: func @fun(18// CHECK-SAME: %[[A:.*]]: !fir.ref<i64>19func.func @fun(%a : !fir.ref<i64>) -> i64 {20 // CHECK: %[[LOAD:.*]] = fir.load %[[A]] : !fir.ref<i64>21 %1 = fir.load %a : !fir.ref<i64>22 %2 = fir.load %a : !fir.ref<i64>23 // CHECK-NEXT: %{{.*}} = arith.addi %[[LOAD]], %[[LOAD]] : i6424 %3 = arith.addi %1, %2 : i6425 %4 = fir.load %a : !fir.ref<i64>26 // CHECK-NEXT: %{{.*}} = arith.addi27 %5 = arith.addi %3, %4 : i6428 %6 = fir.load %a : !fir.ref<i64>29 // CHECK-NEXT: %{{.*}} = arith.addi30 %7 = arith.addi %5, %6 : i6431 %8 = fir.load %a : !fir.ref<i64>32 // CHECK-NEXT: %{{.*}} = arith.addi33 %9 = arith.addi %7, %8 : i6434 %10 = fir.load %a : !fir.ref<i64>35 // CHECK-NEXT: %{{.*}} = arith.addi36 %11 = arith.addi %10, %9 : i6437 %12 = fir.load %a : !fir.ref<i64>38 // CHECK-NEXT: %{{.*}} = arith.addi39 %13 = arith.addi %11, %12 : i6440 // CHECK-NEXT: return %{{.*}} : i6441 return %13 : i6442}43 44// -----45 46func.func @fun(%a : !fir.ref<i64>) -> i64 {47 cf.br ^bb148^bb1:49 %1 = fir.load %a : !fir.ref<i64>50 %2 = fir.load %a : !fir.ref<i64>51 %3 = arith.addi %1, %2 : i6452 cf.br ^bb253^bb2:54 %4 = fir.load %a : !fir.ref<i64>55 %5 = arith.subi %4, %4 : i6456 return %5 : i6457}58 59// -----60 61// Check that the redundant ops on volatile operands are PRESERVED.62func.func @fun(%arg0: !fir.ref<i64, volatile>) -> i64 {63 %0 = fir.load %arg0 : !fir.ref<i64, volatile>64 %1 = fir.load %arg0 : !fir.ref<i64, volatile>65 %2 = arith.addi %0, %1 : i6466 fir.store %2 to %arg0 : !fir.ref<i64, volatile>67 fir.store %2 to %arg0 : !fir.ref<i64, volatile>68 return %2 : i6469}70// CHECK-LABEL: func.func @fun(%arg0: !fir.ref<i64, volatile>) -> i64 {71// CHECK: %[[VAL_1:.*]] = fir.load %arg0 : !fir.ref<i64, volatile>72// CHECK: %[[VAL_2:.*]] = fir.load %arg0 : !fir.ref<i64, volatile>73// CHECK: %[[VAL_3:.*]] = arith.addi %[[VAL_1]], %[[VAL_2]] : i6474// CHECK: fir.store %[[VAL_3]] to %arg0 : !fir.ref<i64, volatile>75// CHECK: fir.store %[[VAL_3]] to %arg0 : !fir.ref<i64, volatile>76// CHECK: return %[[VAL_3]] : i6477// CHECK: }78 79// -----80 81// Check that volatile hlfir assignments are PRESERVED.82func.func @_QPdot_product2(%arg0: !fir.box<!fir.array<?x!fir.logical<4>>> {fir.bindc_name = "lhs"}, %arg1: !fir.box<!fir.array<?x!fir.logical<4>>> {fir.bindc_name = "rhs"}, %arg2: !fir.ref<!fir.logical<4>> {fir.bindc_name = "res"}) {83 %0 = fir.dummy_scope : !fir.dscope84 %1 = fir.volatile_cast %arg0 : (!fir.box<!fir.array<?x!fir.logical<4>>>) -> !fir.box<!fir.array<?x!fir.logical<4>>, volatile>85 %2:2 = hlfir.declare %1 dummy_scope %0 {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Elhs"} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.dscope) -> (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>)86 %3 = fir.volatile_cast %arg2 : (!fir.ref<!fir.logical<4>>) -> !fir.ref<!fir.logical<4>, volatile>87 %4:2 = hlfir.declare %3 dummy_scope %0 {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Eres"} : (!fir.ref<!fir.logical<4>, volatile>, !fir.dscope) -> (!fir.ref<!fir.logical<4>, volatile>, !fir.ref<!fir.logical<4>, volatile>)88 %5 = fir.volatile_cast %arg1 : (!fir.box<!fir.array<?x!fir.logical<4>>>) -> !fir.box<!fir.array<?x!fir.logical<4>>, volatile>89 %6:2 = hlfir.declare %5 dummy_scope %0 {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Erhs"} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.dscope) -> (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>)90 %7 = hlfir.dot_product %2#0 %6#0 {fastmath = #arith.fastmath<contract>} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>) -> !fir.logical<4>91 hlfir.assign %7 to %4#0 : !fir.logical<4>, !fir.ref<!fir.logical<4>, volatile>92 %8 = hlfir.dot_product %2#0 %6#0 {fastmath = #arith.fastmath<contract>} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>) -> !fir.logical<4>93 hlfir.assign %8 to %4#0 : !fir.logical<4>, !fir.ref<!fir.logical<4>, volatile>94 return95}96 97// CHECK-LABEL: func.func @_QPdot_product2(98// CHECK-SAME: %[[VAL_0:[0-9]+|[a-zA-Z$._-][a-zA-Z0-9$._-]*]]: !fir.box<!fir.array<?x!fir.logical<4>>> {fir.bindc_name = "lhs"},99// CHECK-SAME: %[[VAL_1:[0-9]+|[a-zA-Z$._-][a-zA-Z0-9$._-]*]]: !fir.box<!fir.array<?x!fir.logical<4>>> {fir.bindc_name = "rhs"},100// CHECK-SAME: %[[VAL_2:[0-9]+|[a-zA-Z$._-][a-zA-Z0-9$._-]*]]: !fir.ref<!fir.logical<4>> {fir.bindc_name = "res"}) {101// CHECK: %[[VAL_3:.*]] = fir.dummy_scope : !fir.dscope102// CHECK: %[[VAL_4:.*]] = fir.volatile_cast %[[VAL_0]] : (!fir.box<!fir.array<?x!fir.logical<4>>>) -> !fir.box<!fir.array<?x!fir.logical<4>>, volatile>103// CHECK: %[[VAL_5:.*]]:2 = hlfir.declare %[[VAL_4]] dummy_scope %[[VAL_3]] {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Elhs"} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.dscope) -> (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>)104// CHECK: %[[VAL_6:.*]] = fir.volatile_cast %[[VAL_2]] : (!fir.ref<!fir.logical<4>>) -> !fir.ref<!fir.logical<4>, volatile>105// CHECK: %[[VAL_7:.*]]:2 = hlfir.declare %[[VAL_6]] dummy_scope %[[VAL_3]] {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Eres"} : (!fir.ref<!fir.logical<4>, volatile>, !fir.dscope) -> (!fir.ref<!fir.logical<4>, volatile>, !fir.ref<!fir.logical<4>, volatile>)106// CHECK: %[[VAL_8:.*]] = fir.volatile_cast %[[VAL_1]] : (!fir.box<!fir.array<?x!fir.logical<4>>>) -> !fir.box<!fir.array<?x!fir.logical<4>>, volatile>107// CHECK: %[[VAL_9:.*]]:2 = hlfir.declare %[[VAL_8]] dummy_scope %[[VAL_3]] {fortran_attrs = #fir.var_attrs<volatile>, uniq_name = "_QFdot_product2Erhs"} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.dscope) -> (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>)108// CHECK: %[[VAL_10:.*]] = hlfir.dot_product %[[VAL_5]]#0 %[[VAL_9]]#0 {fastmath = #arith.fastmath<contract>} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>) -> !fir.logical<4>109// CHECK: hlfir.assign %[[VAL_10]] to %[[VAL_7]]#0 : !fir.logical<4>, !fir.ref<!fir.logical<4>, volatile>110// CHECK: %[[VAL_11:.*]] = hlfir.dot_product %[[VAL_5]]#0 %[[VAL_9]]#0 {fastmath = #arith.fastmath<contract>} : (!fir.box<!fir.array<?x!fir.logical<4>>, volatile>, !fir.box<!fir.array<?x!fir.logical<4>>, volatile>) -> !fir.logical<4>111// CHECK: hlfir.assign %[[VAL_11]] to %[[VAL_7]]#0 : !fir.logical<4>, !fir.ref<!fir.logical<4>, volatile>112// CHECK: return113// CHECK: }114