// Test fir.box_offset parse/print/parse/print identity. // RUN: fir-opt %s | fir-opt | FileCheck %s func.func @test_box_offset(%unlimited : !fir.ref>, %type_star : !fir.ref>>) { %box1 = fir.alloca !fir.box %addr1 = fir.box_offset %box1 base_addr : (!fir.ref>) -> !fir.llvm_ptr> %box2 = fir.alloca !fir.box> %addr2 = fir.box_offset %box2 base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> %tdesc2 = fir.box_offset %box2 derived_type : (!fir.ref>>) -> !fir.llvm_ptr>> %box3 = fir.alloca !fir.box> %addr3 = fir.box_offset %box3 base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> %box4 = fir.alloca !fir.box>>> %addr4 = fir.box_offset %box4 base_addr : (!fir.ref>>>>) -> !fir.llvm_ptr>>> %tdesc4 = fir.box_offset %box4 derived_type : (!fir.ref>>>>) -> !fir.llvm_ptr>> %addr5 = fir.box_offset %unlimited base_addr : (!fir.ref>) -> !fir.llvm_ptr> %tdesc5 = fir.box_offset %unlimited derived_type : (!fir.ref>) -> !fir.llvm_ptr> %addr6 = fir.box_offset %type_star base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> %tdesc6 = fir.box_offset %type_star derived_type : (!fir.ref>>) -> !fir.llvm_ptr> return } // CHECK-LABEL: func.func @test_box_offset( // CHECK-SAME: %[[VAL_0:.*]]: !fir.ref>, // CHECK-SAME: %[[VAL_1:.*]]: !fir.ref>>) { // CHECK: %[[VAL_2:.*]] = fir.alloca !fir.box // CHECK: %[[VAL_3:.*]] = fir.box_offset %[[VAL_2]] base_addr : (!fir.ref>) -> !fir.llvm_ptr> // CHECK: %[[VAL_4:.*]] = fir.alloca !fir.box> // CHECK: %[[VAL_5:.*]] = fir.box_offset %[[VAL_4]] base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> // CHECK: %[[VAL_6:.*]] = fir.box_offset %[[VAL_4]] derived_type : (!fir.ref>>) -> !fir.llvm_ptr>> // CHECK: %[[VAL_7:.*]] = fir.alloca !fir.box> // CHECK: %[[VAL_8:.*]] = fir.box_offset %[[VAL_7]] base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> // CHECK: %[[VAL_9:.*]] = fir.alloca !fir.box>>> // CHECK: %[[VAL_10:.*]] = fir.box_offset %[[VAL_9]] base_addr : (!fir.ref>>>>) -> !fir.llvm_ptr>>> // CHECK: %[[VAL_11:.*]] = fir.box_offset %[[VAL_9]] derived_type : (!fir.ref>>>>) -> !fir.llvm_ptr>> // CHECK: %[[VAL_12:.*]] = fir.box_offset %[[VAL_0]] base_addr : (!fir.ref>) -> !fir.llvm_ptr> // CHECK: %[[VAL_13:.*]] = fir.box_offset %[[VAL_0]] derived_type : (!fir.ref>) -> !fir.llvm_ptr> // CHECK: %[[VAL_14:.*]] = fir.box_offset %[[VAL_1]] base_addr : (!fir.ref>>) -> !fir.llvm_ptr>> // CHECK: %[[VAL_15:.*]] = fir.box_offset %[[VAL_1]] derived_type : (!fir.ref>>) -> !fir.llvm_ptr>