diff options
| author | Laurence Kedward <laurence.kedward@bristol.ac.uk> | 2021-07-16 11:07:16 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2021-07-16 11:07:16 +0100 |
| commit | 68937a4eae6a71b74edbf762c574cc2dc22bb2d6 (patch) | |
| tree | e61837e75eeb361af0c3624a7f28169a9d06bf60 /src/fpm_environment.f90 | |
| parent | 5617e65751193afb3c88fbc6cb8a32822ff52ffa (diff) | |
| parent | 87271c5a55ad6412114c4b153c1a8d0bd37156f5 (diff) | |
| download | fpm-68937a4eae6a71b74edbf762c574cc2dc22bb2d6.tar.gz fpm-68937a4eae6a71b74edbf762c574cc2dc22bb2d6.zip | |
Merge pull request #511 from urbanjost/warn_blank_name
check name used for package, executable, test, or example
Diffstat (limited to 'src/fpm_environment.f90')
| -rw-r--r-- | src/fpm_environment.f90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fpm_environment.f90 b/src/fpm_environment.f90 index cf76250..e9da3c7 100644 --- a/src/fpm_environment.f90 +++ b/src/fpm_environment.f90 @@ -6,6 +6,7 @@ module fpm_environment use,intrinsic :: iso_fortran_env, only : stdin=>input_unit, & & stdout=>output_unit, & & stderr=>error_unit + use fpm_error, only : fpm_stop implicit none private public :: get_os_type @@ -157,8 +158,7 @@ contains exitstat = stat else if (stat /= 0) then - print *, 'Command failed' - error stop + call fpm_stop(1,'*run*:Command failed') end if end if |