Fixed compiler warnings.

* Avoid warnings about unused variables (due to __SPGLIB conditional compilation). * Avoid warning about dummy OUT-arg without assigned value (unused variable).
cp2k · Mar 3, 2021 · 7ba29c8 · 7ba29c8
1 parent 21a7ae4
commit 7ba29c8
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 4 deletions.
diff --git a/src/libint_wrapper.F b/src/libint_wrapper.F
@@ -479,7 +479,7 @@ FUNCTION get_ssss_f_val(lib)
       get_ssss_f_val = lib%prv(1)%f_aB_s___0__s___1___TwoPRep_s___0__s___1___Ab__up_0(1)
 #else
       MARK_USED(lib)
-      MARK_USED(get_ssss_f_val)
+      get_ssss_f_val = 0.0_dp
       CPABORT("This CP2K executable has not been linked against the required library libint.")
 #endif
 

diff --git a/src/motion/space_groups.F b/src/motion/space_groups.F
@@ -93,10 +93,11 @@ SUBROUTINE spgr_create(scoor, types, cell, gopt_env, eps_symmetry, pol, ranges,
       LOGICAL, INTENT(IN)                                :: print_atoms
 
       CHARACTER(LEN=*), PARAMETER :: routineN = 'spgr_create', routineP = moduleN//':'//routineN
-
+#ifdef __SPGLIB
       CHARACTER(LEN=1000)                                :: buffer
-      INTEGER                                            :: handle, i, ierr, j, n_sr_rep, nchars, &
-                                                            nop, tra_mat(3, 3)
+      INTEGER                                            :: ierr, nchars, nop, tra_mat(3, 3)
+#endif
+      INTEGER                                            :: handle, i, j, n_sr_rep
       INTEGER, ALLOCATABLE, DIMENSION(:)                 :: tmp_types
       LOGICAL                                            :: spglib
       REAL(KIND=dp), ALLOCATABLE, DIMENSION(:, :)        :: tmp_coor