From 9eec0cace17be55af0254c32a10875a0115b5095 Mon Sep 17 00:00:00 2001 From: lanfer Date: Tue, 9 Nov 1999 12:17:15 +0000 Subject: 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 --- src/util/Misc.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/util') 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; -- cgit v1.2.3