spack/var/spack/repos/builtin/packages/cosmomc/errorstop.patch
Erik Schnetter 2ac343e92e cosmomc: New package CosmoMC (#3292)
* cosmomc: New package CosmoMC

* cosmomc: Improve version numbering scheme

* planck-likelihood: New package

* cosmomc: Pacify flake8

* cosmomc: Code cleanup as requested in the review

* cosmomc: Various updates suggested during review

* cosmomc: Limit compiler versions (as documented in the build instructions)

* cosmomc: Correct flake8 error

* cosmomc: Use `libs` instead of `lapack_libs`

* planck-likelihood: Make makefile output more verbose and readable

* planck-likelilhood: Correct order of libraries when calling linker

* cosmomc: Clean up check for suitable compiler

* planck-likelihood: Use modern mechanism to set environment variables
2017-03-09 08:14:13 -06:00

12 lines
301 B
Diff

--- a/camb/constants.f90
+++ b/camb/constants.f90
@@ -87,7 +87,7 @@
global_error_message=''
end if
if (present(id)) then
- if (id==0) error stop('Error id must be non-zero')
+ if (id==0) error stop
global_error_flag=id
else
global_error_flag=-1