Following RFC at https://discourse.llvm.org/t/rfc-ffp-contract-default-value/66301 This adds the `fastmath<contract>` attribute to `fir.call` and some floating point arithmetic operations (hence the many test changes). Instead of testing for this specific attribute, I am using a regular expression to match any attributes.
13 lines
459 B
Fortran
13 lines
459 B
Fortran
!RUN: %flang_fc1 -emit-fir -fopenmp %s -o - | FileCheck %s --check-prefixes="FIRDialect,OMPDialect"
|
|
!RUN: %flang_fc1 -emit-fir -fopenmp %s -o - | fir-opt --fir-to-llvm-ir | FileCheck %s --check-prefixes="OMPDialect"
|
|
|
|
!FIRDialect-LABEL: @_QPomp_taskwait
|
|
subroutine omp_taskwait
|
|
!OMPDialect: omp.taskwait
|
|
!$omp taskwait
|
|
!FIRDialect: fir.call @_QPfoo() {{.*}}: () -> ()
|
|
call foo()
|
|
!OMPDialect: omp.taskwait
|
|
!$omp taskwait
|
|
end subroutine omp_taskwait
|