From 1b8c0cf5e3f579ec5a8f99151123e9b1820abc28 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6>
Date: Wed, 8 Dec 2004 08:13:14 +0000
Subject: Add missing argument ierr for CCTK_CoordRange.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Fortran/trunk@23 51d2df92-0e4f-0410-a727-bd43d766d6b6
---
 src/cctk_Coord.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/cctk_Coord.F90 b/src/cctk_Coord.F90
index 93a2db0..6075bca 100644
--- a/src/cctk_Coord.F90
+++ b/src/cctk_Coord.F90
@@ -40,7 +40,8 @@ module cctk_Coord
      end subroutine CCTK_CoordName
 
      subroutine CCTK_CoordRange &
-          (GH, coord_lower, coord_upper, coord_dir, coord_name, system_name)
+          (ierr, GH, coord_lower, coord_upper, &
+          coord_dir, coord_name, system_name)
        implicit none
        integer               ierr
        CCTK_POINTER_TO_CONST GH
-- 
cgit v1.2.3