diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-06-15 09:03:57 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 1999-06-15 09:03:57 +0000 |
commit | 8970cf2d062b5650cd2ae764ded94769d8d027a7 (patch) | |
tree | a73838e0935bca6e4799a561241e4dfc6ba12e29 /lib/sbin/create_fortran_stuff.pl | |
parent | 73c042453a8491a59c1e44965ec2a62440db04b8 (diff) |
Double -> CCTK_REAL
REAL -> CCTK_REAL
POINTER -> CCTK_POINTER
VARIABLE_REAL -> CCTK_VARIABLE_REAL (etc)
GH->iteration is now an int (not an unsigned long int)
git-svn-id: http://svn.cactuscode.org/flesh/trunk@551 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'lib/sbin/create_fortran_stuff.pl')
-rw-r--r-- | lib/sbin/create_fortran_stuff.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/sbin/create_fortran_stuff.pl b/lib/sbin/create_fortran_stuff.pl index f5a21e0a..ea4d7742 100644 --- a/lib/sbin/create_fortran_stuff.pl +++ b/lib/sbin/create_fortran_stuff.pl @@ -186,7 +186,7 @@ sub get_fortran_type_string $type eq "SENTENCE") { $type_string = "CCTK_STRING "; - } + } elsif($type eq "LOGICAL" || $type eq "INTEGER") { @@ -194,7 +194,7 @@ sub get_fortran_type_string } elsif($type eq "REAL") { - $type_string = "REAL "; + $type_string = "CCTK_REAL "; } else { |