diff options
author | lanfer <lanfer@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-11-09 12:17:15 +0000 |
---|---|---|
committer | lanfer <lanfer@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-11-09 12:17:15 +0000 |
commit | 9eec0cace17be55af0254c32a10875a0115b5095 (patch) | |
tree | 31d6df0640ca840fe3c4e930ade417547263347b | |
parent | 2b091105fe40f682a5c27fc01fe52fbef12df549 (diff) |
CCTK_FortranString has to return the lenght of the string as CCTK_INT, not int because this gives pointer errors (on the T3E)
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1147 17b73243-c579-4c4c-a9d2-2d5706c11dac
-rw-r--r-- | src/util/Misc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/util/Misc.c b/src/util/Misc.c index 791fc44f..d1159889 100644 --- a/src/util/Misc.c +++ b/src/util/Misc.c @@ -972,7 +972,7 @@ int CCTK_RegexMatch(const char *string, @@*/ -void FORTRAN_NAME(CCTK_FortranString)(int *nchar, char **cstring,ONE_FORTSTRING_ARG) +void FORTRAN_NAME(CCTK_FortranString)(CCTK_INT *nchar, char **cstring,ONE_FORTSTRING_ARG) { int i; |