1! RUN: bbc -emit-hlfir -fcuda %s -o - | FileCheck %s 2 3! Simple module to test module use in 4 5module cuf_mod 6 real, device :: md 7 8contains 9 attributes(device) subroutine devsub() 10 end 11end module 12 13! CHECK: fir.global @_QMcuf_modEmd {data_attr = #cuf.cuda<device>} : f32 14 15! CHECK: func.func @_QMcuf_modPdevsub() attributes {cuf.proc_attr = #cuf.cuda_proc<device>} 16