Change error code in ELPA_INIT

6e2bac26 · Andreas Marek · 39467e87 · 6e2bac26
Commit 6e2bac26 authored Nov 20, 2018 by Andreas Marek
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/elpa_api.F90 src/elpa_api.F90 +1 -1

No files found.
--- a/src/elpa_api.F90
+++ b/src/elpa_api.F90
@@ -783,7 +783,7 @@ module elpa_api
        error = ELPA_OK
      else
        write(error_unit, "(a,i0,a)") "ELPA: Error API version ", api_version," is not supported by this library"
-        error = ELPA_ERROR
+        error = ELPA_ERROR_API_VERSION
      endif
    end function