diff options
| -rw-r--r-- | src/fpm_backend.f90 | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/fpm_backend.f90 b/src/fpm_backend.f90 index 6cf4f2d..e0c6d73 100644 --- a/src/fpm_backend.f90 +++ b/src/fpm_backend.f90 @@ -268,9 +268,11 @@ subroutine build_target(model,target,stat) integer :: fh + !$omp critical if (.not.exists(dirname(target%output_file))) then call mkdir(dirname(target%output_file)) end if + !$omp end critical select case(target%target_type) |