[cig-commits] [commit] devel: fixed a warning when compiling in serial mode (89740c1)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/specfem3d

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/fc2839b18b6c49bf4b4ceab92a309ede2f7314eb...89740c1c73a406c97569fb65f48117e58f7cf2fe

>---------------------------------------------------------------

commit 89740c1c73a406c97569fb65f48117e58f7cf2fe
Author: Dimitri Komatitsch <komatitsch at lma.cnrs-mrs.fr>
Date:   Tue Dec 9 23:17:34 2014 +0100

    fixed a warning when compiling in serial mode


>---------------------------------------------------------------

89740c1c73a406c97569fb65f48117e58f7cf2fe
 src/shared/serial.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/shared/serial.f90 b/src/shared/serial.f90
index acc8191..d67fc86 100644
--- a/src/shared/serial.f90
+++ b/src/shared/serial.f90
@@ -376,7 +376,7 @@
 
   subroutine init_mpi()
 
-  use constants, only: NUMBER_OF_SIMULTANEOUS_RUNS
+  use shared_parameters, only: NUMBER_OF_SIMULTANEOUS_RUNS
 
   if (NUMBER_OF_SIMULTANEOUS_RUNS <= 0) stop 'NUMBER_OF_SIMULTANEOUS_RUNS <= 0 makes no sense'