diff options
Diffstat (limited to 'src/util/File.c')
-rw-r--r-- | src/util/File.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/util/File.c b/src/util/File.c index 69b238a0..4153671c 100644 --- a/src/util/File.c +++ b/src/util/File.c @@ -243,7 +243,7 @@ int CCTK_CreateDirectory(int mode, const char *pathname) void CCTK_FCALL CCTK_FNAME(CCTK_CreateDirectory) (int *ierr, int *mode, ONE_FORTSTRING_ARG) { - ONE_FORTSTRINGS_CREATE(arg1) - *ierr = CCTK_CreateDirectory(mode,arg1); + ONE_FORTSTRING_CREATE(arg1) + *ierr = CCTK_CreateDirectory(*mode,arg1); free(arg1); } |