amended #127 fixes for the case where max-am is not given as a list

evaleev · May 13, 2019 · 3fc6f9a · 3fc6f9a
1 parent c049c31
commit 3fc6f9a
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/export/fortran/libint_f.F90 b/export/fortran/libint_f.F90
@@ -12,12 +12,18 @@ MODULE libint_f
 #endif
 #ifdef LIBINT2_MAX_AM_default
    INTEGER, PARAMETER :: libint2_max_am_default = LIBINT2_MAX_AM_default
+#else
+#  error "LIBINT2_MAX_AM_default is expected to be defined, libint2_params.h is misgenerated"
 #endif
 #ifdef LIBINT2_MAX_AM_default1
    INTEGER, PARAMETER :: libint2_max_am_default1 = LIBINT2_MAX_AM_default1
+#else
+   INTEGER, PARAMETER :: libint2_max_am_default1 = LIBINT2_MAX_AM_default
 #endif
 #ifdef LIBINT2_MAX_AM_default2
    INTEGER, PARAMETER :: libint2_max_am_default2 = LIBINT2_MAX_AM_default2
+#else
+   INTEGER, PARAMETER :: libint2_max_am_default2 = LIBINT2_MAX_AM_default
 #endif
 #ifdef LIBINT2_MAX_AM_eri
    INTEGER, PARAMETER :: libint2_max_am_eri = LIBINT2_MAX_AM_eri