mirror of
https://github.com/autc04/Retro68.git
synced 2024-07-06 22:29:13 +00:00
9 lines
319 B
Fortran
9 lines
319 B
Fortran
! { dg-do run }
|
|
! { dg-additional-options "-fdefault-integer-8" }
|
|
! { dg-skip-if "" { ! run_expensive_tests } { "*" } { "-O2" } }
|
|
! { dg-set-target-env-var OMP_PROC_BIND "spread,close" }
|
|
! { dg-set-target-env-var OMP_PLACES "{6,7}:4:-2,!{2,3}" }
|
|
! { dg-set-target-env-var OMP_NUM_THREADS "2" }
|
|
|
|
include 'affinity1.f90'
|