blob: 45e783662fb0161160edb1d1add69602821565ba [file] [log] [blame]
Valentin Clementb8535b52022-08-18 18:21:211// RUN: fir-opt --target-rewrite="target=x86_64-unknown-linux-gnu" %s | FileCheck %s
2
Valentin Clement5dbeb2c2022-08-19 06:40:093// Test with an argument shift.
4
jeanPerierc4204c02024-10-03 15:10:575func.func @_QFPf(%arg0: !fir.ref<tuple<!fir.ref<i32>>> {fir.host_assoc}) -> complex<f128> {
6 %0 = fir.alloca complex<f128> {bindc_name = "f", uniq_name = "_QFfEf"}
Valentin Clementb8535b52022-08-18 18:21:217 %c2_i32 = arith.constant 2 : i32
8 %1 = fir.convert %c2_i32 : (i32) -> f128
9 %cst = arith.constant 0.000000e+00 : f128
jeanPerierc4204c02024-10-03 15:10:5710 %2 = fir.undefined complex<f128>
11 %3 = fir.insert_value %2, %1, [0 : index] : (complex<f128>, f128) -> complex<f128>
12 %4 = fir.insert_value %3, %cst, [1 : index] : (complex<f128>, f128) -> complex<f128>
13 fir.store %4 to %0 : !fir.ref<complex<f128>>
14 %5 = fir.load %0 : !fir.ref<complex<f128>>
15 return %5 : complex<f128>
Valentin Clementb8535b52022-08-18 18:21:2116}
17
18// CHECK-LABEL: func.func @_QFPf
jeanPerierc4204c02024-10-03 15:10:5719// CHECK-SAME: %{{.*}}: !fir.ref<tuple<f128, f128>> {llvm.align = 16 : i32, llvm.sret = tuple<f128, f128>}, %arg1: !fir.ref<tuple<!fir.ref<i32>>> {fir.host_assoc, llvm.nest}) {
Valentin Clement5dbeb2c2022-08-19 06:40:0920
21// -----
22
23// Test with no shift.
24
25func.func @_QFPs(%arg0: !fir.ref<i32> {fir.host_assoc}) {
26 return
27}
28
29// CHECK: func.func @_QFPs(%arg0: !fir.ref<i32> {fir.host_assoc, llvm.nest})