aboutsummaryrefslogtreecommitdiff
path: root/src/fpm.f90
diff options
context:
space:
mode:
Diffstat (limited to 'src/fpm.f90')
-rw-r--r--src/fpm.f9011
1 files changed, 4 insertions, 7 deletions
diff --git a/src/fpm.f90 b/src/fpm.f90
index 8b05a38..135cadc 100644
--- a/src/fpm.f90
+++ b/src/fpm.f90
@@ -59,13 +59,10 @@ subroutine build_model(model, settings, package, error)
call filewrite(join_path("build", ".gitignore"),["*"])
end if
- call new_compiler(model%compiler, settings%compiler, settings%c_compiler)
- call new_archiver(model%archiver, settings%archiver)
-
- model%compiler%verbose = settings%verbose
- model%compiler%echo = settings%verbose
- model%archiver%verbose = settings%verbose
- model%archiver%echo = settings%verbose
+ call new_compiler(model%compiler, settings%compiler, settings%c_compiler, &
+ & echo=settings%verbose, verbose=settings%verbose)
+ call new_archiver(model%archiver, settings%archiver, &
+ & echo=settings%verbose, verbose=settings%verbose)
if (settings%flag == '') then
flags = model%compiler%get_default_flags(settings%profile == "release")