From 81b77cc6922e46fa2763edb561a1faa2ec9a7e53 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@51d2df92-0e4f-0410-a727-bd43d766d6b6>
Date: Tue, 22 Mar 2005 17:30:51 +0000
Subject: Do not declare some routines as external, because some Fortran
 compilers insist on a definition once they have seen an external declaration.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Fortran/trunk@25 51d2df92-0e4f-0410-a727-bd43d766d6b6
---
 src/cctk_Misc.F90 | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/src/cctk_Misc.F90 b/src/cctk_Misc.F90
index 313fa33..be99736 100644
--- a/src/cctk_Misc.F90
+++ b/src/cctk_Misc.F90
@@ -94,12 +94,14 @@ module cctk_Misc
      end subroutine Util_RunTitle
 
   end interface
-
-  external Util_InList
-  external IntInRangeList
-  external DoubleInRangeList
-  external SetDoubleInRangeList
-  external SetIntInRangeList
-  external SetKeywordInRangeList
+  
+  ! Do not declare these, because some compilers insist on a
+  ! definition once they have seen an external declaration:
+!!$  external Util_InList
+!!$  external Util_IntInRangeList
+!!$  external Util_DoubleInRangeList
+!!$  external CCTK_SetDoubleInRangeList
+!!$  external CCTK_SetIntInRangeList
+!!$  external CCTK_SetKeywordInRangeList
   
 end module cctk_Misc
-- 
cgit v1.2.3