13 lines · plain
1// RUN: tco %s | FileCheck %s2// RUN: %flang_fc1 -emit-llvm %s -o - | FileCheck %s3 4// CHECK: @var_x = external global i325fir.global @var_x : !fir.int<4> {}6 7// CHECK-LABEL: define ptr @getAddressOfX8func.func @getAddressOfX() -> !fir.ref<!fir.int<4>> {9 %1 = fir.address_of(@var_x) : !fir.ref<!fir.int<4>>10 // CHECK: ret ptr @var_x11 return %1 : !fir.ref<!fir.int<4>>12}13