flang/test/Fir/addrof.fir

   1 // RUN: tco %s | FileCheck %s
   2 // RUN: %flang_fc1 -emit-llvm %s -o - | FileCheck %s
   3
   4 // CHECK: @var_x = external global i32
   5 fir.global @var_x : !fir.int<4> {}
   6
   7 // CHECK-LABEL: define ptr @getAddressOfX
   8 func.func @getAddressOfX() -> !fir.ref<!fir.int<4>> {
   9   %1 = fir.address_of(@var_x) : !fir.ref<!fir.int<4>>
  10   // CHECK: ret ptr @var_x
  11   return %1 : !fir.ref<!fir.int<4>>
  12 }