CCTK function name changes

Reorganising file structure


git-svn-id: http://svn.cactuscode.org/flesh/trunk@1296 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 0 insertions, 50 deletions

diff --git a/src/comm/FortranBindings.c b/src/comm/FortranBindings.c
deleted file mode 100644
index 2a273b7c..00000000
--- a/src/comm/FortranBindings.c
+++ /dev/null
@@ -1,50 +0,0 @@
- /*@@
-   @file      FortranBindings.c
-   @date      Thu Feb  18 14:27:18 1999
-   @author    Gabrielle Allen
-   @desc 
-   Fortran bindings for the comm functions
-   @enddesc 
- @@*/
-
-#include <stdlib.h>
-#include "cctk_Flesh.h"
-#include "cctk_FortranString.h"
-#include "cctk_Comm.h"
-
-int FMODIFIER FORTRAN_NAME(CCTK_Exit)(cGH *GH)
-{
-  CCTK_Exit(GH);
-  return 0;
-}
-
-int FMODIFIER FORTRAN_NAME(CCTK_ParallelInit)(cGH *GH)
-{
-  CCTK_ParallelInit(GH);
-  return 0;
-}
-
-int FMODIFIER FORTRAN_NAME(CCTK_Abort)(cGH *GH)
-{
-  CCTK_Abort(GH);
-  return 0;
-}
-
-int FMODIFIER FORTRAN_NAME(CCTK_SyncGroup)(cGH *GH, ONE_FORTSTRING_ARG)
-{
-  ONE_FORTSTRING_CREATE(group_name)
-  CCTK_SyncGroup(GH,group_name);
-  free(group_name); 
-  return 0;
-}
-
-int FMODIFIER FORTRAN_NAME(CCTK_nProcs)(cGH *GH)
-{
-  return CCTK_nProcs(GH);
-}
- 
-int FMODIFIER FORTRAN_NAME(CCTK_MyProc)(cGH *GH)
-{
-  return CCTK_MyProc(GH);
-}
-