diff options
-rw-r--r-- | lib/sbin/schedule_parser.pl | 2 | ||||
-rw-r--r-- | src/include/Comm.h | 9 | ||||
-rw-r--r-- | src/include/Groups.h | 2 |
3 files changed, 10 insertions, 3 deletions
diff --git a/lib/sbin/schedule_parser.pl b/lib/sbin/schedule_parser.pl index f8102be6..13ed9006 100644 --- a/lib/sbin/schedule_parser.pl +++ b/lib/sbin/schedule_parser.pl @@ -620,7 +620,7 @@ sub fortran_wrapper { #include \"cctk.h\" #include \"flesh.h\" #include \"Groups.h\" -#include \"GroupsOnGH.h\" +#include \"Comm.h\" #include \"declare_arguments.h\" void FORTRAN_NAME($routine)($THORN_C2F_PROTO); diff --git a/src/include/Comm.h b/src/include/Comm.h index 3fde4736..84075ce6 100644 --- a/src/include/Comm.h +++ b/src/include/Comm.h @@ -23,8 +23,17 @@ extern "C" { #undef OVERLOADABLE +int CCTK_QueryGroupStorage(cGH *,const char *); +int CCTK_QueryGroupStorage_ByIndex(cGH *,int); +int *CCTK_ArrayGroupSize(cGH *,const char *,int); +int *CCTK_ArrayGroupSize_ByIndex(cGH *,int,int); + #ifdef __cplusplus } #endif #endif + + + + diff --git a/src/include/Groups.h b/src/include/Groups.h index e6609ac3..e3383cc1 100644 --- a/src/include/Groups.h +++ b/src/include/Groups.h @@ -41,8 +41,6 @@ int CCTK_GetNumVars(void); int CCTK_GetNumGroups(void); -int CCTK_QueryGroupStorage(cGH *GH, const char *group); - int CCTK_GTypeNumber(const char *type); int CCTK_VTypeNumber(const char *type); |