summaryrefslogtreecommitdiff
path: root/lib/sbin/create_fortran_stuff.pl
diff options
context:
space:
mode:
authorallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-06-15 09:03:57 +0000
committerallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>1999-06-15 09:03:57 +0000
commit8970cf2d062b5650cd2ae764ded94769d8d027a7 (patch)
treea73838e0935bca6e4799a561241e4dfc6ba12e29 /lib/sbin/create_fortran_stuff.pl
parent73c042453a8491a59c1e44965ec2a62440db04b8 (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.pl4
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
{