From 12330918025efc50632ec2f3cf90a57dea4d4443 Mon Sep 17 00:00:00 2001 From: schnetter Date: Mon, 27 Oct 2003 15:31:27 +0000 Subject: Change include mechanism for aliased functions in Fortran. One now has to #include "cctk_Functions.h" and then use the macro DECLARE_CCTK_FUNCTIONS. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@357 89daf98e-ef62-4674-b946-b8ff9de2216c --- src/AHFinder.F | 1 + src/AHFinder_ParamCheck.F90 | 1 + src/AHFinder_dis.F | 1 + src/AHFinder_fun.F | 1 + src/AHFinder_gau.F | 1 + src/AHFinder_int.F | 1 + src/AHFinder_mask.F | 1 + src/AHFinder_output.F | 1 + src/SetSym.F | 1 + 9 files changed, 9 insertions(+) diff --git a/src/AHFinder.F b/src/AHFinder.F index d0bb150..a4bfdaf 100644 --- a/src/AHFinder.F +++ b/src/AHFinder.F @@ -16,6 +16,7 @@ #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder(CCTK_ARGUMENTS) diff --git a/src/AHFinder_ParamCheck.F90 b/src/AHFinder_ParamCheck.F90 index 9d63f2e..7324dce 100644 --- a/src/AHFinder_ParamCheck.F90 +++ b/src/AHFinder_ParamCheck.F90 @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" #include "cctk_Parameters.h" ! CCTK_FILEVERSION(CactusEinstein_AHFinder_ParamCheck_f) diff --git a/src/AHFinder_dis.F b/src/AHFinder_dis.F index 01bb346..f0516a5 100644 --- a/src/AHFinder_dis.F +++ b/src/AHFinder_dis.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_dis(CCTK_ARGUMENTS) diff --git a/src/AHFinder_fun.F b/src/AHFinder_fun.F index 2790e56..e39cc2d 100644 --- a/src/AHFinder_fun.F +++ b/src/AHFinder_fun.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_fun(CCTK_ARGUMENTS) diff --git a/src/AHFinder_gau.F b/src/AHFinder_gau.F index 85d91fb..98be8f6 100644 --- a/src/AHFinder_gau.F +++ b/src/AHFinder_gau.F @@ -16,6 +16,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_gau(CCTK_ARGUMENTS) diff --git a/src/AHFinder_int.F b/src/AHFinder_int.F index 170a7ab..4e3c1b4 100644 --- a/src/AHFinder_int.F +++ b/src/AHFinder_int.F @@ -16,6 +16,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_int(CCTK_ARGUMENTS) diff --git a/src/AHFinder_mask.F b/src/AHFinder_mask.F index 816141c..de8f347 100644 --- a/src/AHFinder_mask.F +++ b/src/AHFinder_mask.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_mask(CCTK_ARGUMENTS,rhor) diff --git a/src/AHFinder_output.F b/src/AHFinder_output.F index ba3ef9d..4aceea2 100644 --- a/src/AHFinder_output.F +++ b/src/AHFinder_output.F @@ -10,6 +10,7 @@ #include "cctk.h" #include "cctk_Parameters.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" subroutine AHFinder_InitOutput(CCTK_ARGUMENTS) use AHFinder_dat diff --git a/src/SetSym.F b/src/SetSym.F index a7c331b..bf95b2b 100644 --- a/src/SetSym.F +++ b/src/SetSym.F @@ -9,6 +9,7 @@ #include "cctk.h" #include "cctk_Arguments.h" +#include "cctk_Functions.h" #include "cctk_Parameters.h" /*@@ -- cgit v1.2.3