brintos / llvm-project-archived public Read only

Text · 364 B · f026f15 Raw

14 lines · plain

1!RUN: %flang_fc1 -fdebug-unparse-with-symbols -fopenmp %s | FileCheck %s2 3! This used to crash.4 5subroutine f006  !$omp declare reduction(fred : integer, real : omp_out = omp_in + omp_out)7end8 9!CHECK: !DEF: /f00 (Subroutine) Subprogram10!CHECK: subroutine f0011!CHECK: !$omp declare reduction(fred:integer, real: omp_out = omp_in + omp_out)12!CHECK: end subroutine13 14