[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 303)

[roland.haas at physics.gatech.edu]

User: rhaas
Date: 2011/11/28 01:21 PM

Modified:
 /trunk/src/
  GRHydro_Reconstruct.F90

Log:
 move TARGET statement in Reconstruction to compile with gcc 4.1
 
   gcc 4.1 requires TARGET statements to be before DECLARE_CCTK_ARGUMENTS

File Changes:

Directory: /trunk/src/
======================

File [modified]: GRHydro_Reconstruct.F90
Delta lines: +4 -4
===================================================================
--- trunk/src/GRHydro_Reconstruct.F90	2011-11-26 07:52:10 UTC (rev 302)
+++ trunk/src/GRHydro_Reconstruct.F90	2011-11-28 19:21:52 UTC (rev 303)
@@ -33,6 +33,10 @@
 subroutine Reconstruction(CCTK_ARGUMENTS)
   
   implicit none
+
+  ! save memory when MP is not used
+  ! TARGET as to be before DECLARE_CCTK_ARGUMENTS for gcc 4.1
+  TARGET lvel, vel
   
   DECLARE_CCTK_ARGUMENTS
   DECLARE_CCTK_PARAMETERS
@@ -42,10 +46,6 @@
   CCTK_REAL :: local_min_tracer
 
   ! save memory when MP is not used
-  ! TARGET as to be before DECLARE_CCTK_ARGUMENTS for gcc 4.1
-  TARGET lvel, vel
-
-  ! save memory when MP is not used
   CCTK_INT :: GRHydro_UseGeneralCoordinates
   CCTK_REAL, DIMENSION(:,:,:,:), POINTER :: vup