20 lines · plain
1! RUN: %flang_fc1 -fdebug-dump-symbols %s 2>&1 | FileCheck --dump-input-context=500 %s2!CHECK: Global scope: size=0 alignment=1 sourceRange=0 bytes3!CHECK: IntrinsicModules scope: size=0 alignment=1 sourceRange=0 bytes4!CHECK: Module scope: __fortran_builtins5!CHECK: Module scope: __cuda_builtins size=0 alignment=16!CHECK: Module scope: __fortran_type_info7!CHECK: Module scope: m size=0 alignment=18!CHECK: Subprogram scope: devsubr size=0 alignment=19module m10 implicit none11 contains12 attributes(device) subroutine devsubr()13 !CHECK: blockdim: Use from blockdim in __cuda_builtins14 !CHECK: blockidx: Use from blockidx in __cuda_builtins15 !CHECK: griddim: Use from griddim in __cuda_builtins16 !CHECK: threadidx: Use from threadidx in __cuda_builtins17 !CHECK: warpsize: Use from warpsize in __cuda_builtins18 end subroutine19end module20