From c6f51a010fbfe3fd099931db7235f6ebe325a033 Mon Sep 17 00:00:00 2001
From: tradke <tradke@17b73243-c579-4c4c-a9d2-2d5706c11dac>
Date: Wed, 28 Jan 2009 17:07:31 +0000
Subject: correct datatype of string_length argument (from integer to CCTK_INT)
 in Fortran wrapper of CCTK_FortranString()

git-svn-id: http://svn.cactuscode.org/flesh/trunk@4529 17b73243-c579-4c4c-a9d2-2d5706c11dac
---
 doc/ReferenceManual/CCTKReference.tex | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'doc/ReferenceManual')

diff --git a/doc/ReferenceManual/CCTKReference.tex b/doc/ReferenceManual/CCTKReference.tex
index bf0b56d5..64069ac9 100644
--- a/doc/ReferenceManual/CCTKReference.tex
+++ b/doc/ReferenceManual/CCTKReference.tex
@@ -2884,7 +2884,7 @@ int CCTK_FortranString (char const * c_string,
 \begin{verbatim}
 #include "cctk.h"
 subroutine CCTK_FortranString (string_length, c_string, fortran_string)
-   integer               string_length
+   CCTK_INT              string_length
    CCTK_POINTER_TO_CONST c_string
    character*(*)         fortran_string
 end subroutine
@@ -2954,9 +2954,9 @@ c *** this is sample Fortran code in this same thorn ***
         DECLARE_CCTK_ARGUMENTS
         DECLARE_CCTK_PARAMETERS
 
-        integer :: string_length
-        integer :: status
-        integer :: table_handle
+        CCTK_INT :: string_length
+        integer  :: status
+        integer  :: table_handle
 
         integer, parameter:: max_string_length = 500
         character*max_string_length :: our_parameters_fstring
-- 
cgit v1.2.3