! RUN: bbc -emit-fir %s -o - | FileCheck %s | |
! Test TARGET attributes on a definition of a global symbol. | |
! CHECK: fir.global @_QMtarget_modEx target : f32 { | |
! CHECK: %[[init:.*]] = fir.zero_bits f32 | |
! CHECK: fir.has_value %[[init]] : f32 | |
! CHECK: } | |
module target_mod | |
real, target :: x | |
end module target_mod |