diff options
| author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-09-14 11:33:29 +0000 |
|---|---|---|
| committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2001-09-14 11:33:29 +0000 |
| commit | 8e2ce46e70c32b3e494ea1f1a566b2ab9b9a6e15 (patch) | |
| tree | 7decfca867e3f92809fae786714d73047d14dcc8 /src/IO | |
| parent | 9f3b334825b06feb87f9e067237404e6bcd444f1 (diff) | |
Moving to new MACROS for fortran strings
git-svn-id: http://svn.cactuscode.org/flesh/trunk@2358 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/IO')
| -rw-r--r-- | src/IO/IOMethods.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/IO/IOMethods.c b/src/IO/IOMethods.c index 6e3a2c1d..84593ce2 100644 --- a/src/IO/IOMethods.c +++ b/src/IO/IOMethods.c @@ -43,9 +43,9 @@ int CactusDefaultOutputVarAsByMethod (cGH *GH, const char *methodname, const char *alias); void CCTK_FCALL CCTK_FNAME (CCTK_OutputVarAsByMethod) - (int *ierr, cGH *GH, THREE_FORTSTRINGS_ARGS); + (int *ierr, cGH *GH, THREE_FORTSTRING_ARG); void CCTK_FCALL CCTK_FNAME (CCTK_OutputVarByMethod) - (int *ierr, cGH *GH, TWO_FORTSTRINGS_ARGS); + (int *ierr, cGH *GH, TWO_FORTSTRING_ARG); int CCTK_OutputVarAs (cGH *GH, const char *var, const char *alias); int CCTK_OutputVar (cGH *GH, const char *var); int CCTK_OutputVarByMethod (cGH *GH, const char *var, const char *method); @@ -439,9 +439,9 @@ int CactusDefaultOutputVarAsByMethod (cGH *GH, void CCTK_FCALL CCTK_FNAME (CCTK_OutputVarAsByMethod) - (int *ierr, cGH *GH, THREE_FORTSTRINGS_ARGS) + (int *ierr, cGH *GH, THREE_FORTSTRING_ARG) { - THREE_FORTSTRINGS_CREATE(var, methodname, alias); + THREE_FORTSTRING_CREATE(var, methodname, alias); *ierr = CCTK_OutputVarAsByMethod (GH, var, methodname, alias); @@ -582,9 +582,9 @@ int CCTK_OutputVarByMethod (cGH *GH, const char *var, const char *method) } void CCTK_FCALL CCTK_FNAME (CCTK_OutputVarByMethod) - (int *ierr, cGH *GH, TWO_FORTSTRINGS_ARGS) + (int *ierr, cGH *GH, TWO_FORTSTRING_ARG) { - TWO_FORTSTRINGS_CREATE(var,method); + TWO_FORTSTRING_CREATE(var,method); *ierr = CCTK_OutputVarByMethod(GH, var, method); free(var); free(method); |