! RUN: %flang_fc1 -fdebug-pre-fir-tree -fopenacc %s | FileCheck %s
! Test structure of the Pre-FIR tree with OpenACC declarative construct
! CHECK: Module m: module m
module m
real, dimension(10) :: x
! CHECK-NEXT: OpenACCDeclarativeConstruct
!$acc declare create(x)
end
! CHECK: End Module m