[Commits] [svn:einsteintoolkit] NullGrid/trunk/src/ (Rev. 4)

[yosef at astro.rit.edu]

User: zlochower
Date: 2011/08/25 07:48 AM

Modified:
 /trunk/src/
  NullGrid_Setup.F90

Log:
 Fixes for gnu compilers. Target needs to be before
 array declaration.

File Changes:

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

File [modified]: NullGrid_Setup.F90
Delta lines: +3 -3
===================================================================
--- trunk/src/NullGrid_Setup.F90	2011-08-25 12:38:08 UTC (rev 3)
+++ trunk/src/NullGrid_Setup.F90	2011-08-25 12:48:47 UTC (rev 4)
@@ -9,12 +9,12 @@
     use NullGrid_Vars
     implicit none
 
+    TARGET :: null_xb, null_xbh, stereo_q, stereo_p, stereo_pp,&
+       zeta, guard_mask, EG_mask, null_rb, null_rbh
+
     DECLARE_CCTK_ARGUMENTS
     DECLARE_CCTK_PARAMETERS
 
-    target :: null_xb, null_xbh, stereo_q, stereo_p, stereo_pp, zeta, guard_mask, EG_mask,&
-       null_rb, null_rbh
-
     gsh = null_gsh
     lsh = null_lsh