Removed deprecated FORTRAN_NAME

git-svn-id: http://svn.cactuscode.org/flesh/trunk@1838 17b73243-c579-4c4c-a9d2-2d5706c11dac

1 files changed, 0 insertions, 13 deletions

diff --git a/lib/sbin/c_file_processor.pl b/lib/sbin/c_file_processor.pl
index c500eba1..da94fe1c 100644
--- a/lib/sbin/c_file_processor.pl
+++ b/lib/sbin/c_file_processor.pl
@@ -140,19 +140,6 @@ sub fixfnames {
 
         $fline =~ s:CCTK_FNAME\s*\(([^\)]*)\):$new:;
     }
-    # DEPRECATED IN BETA 9
-    while($fline =~ m:FORTRAN_NAME\s*\(([^\)]*)\):)
-    {
-        $arglist = $1;
-        $arglist =~ s:[\s\n\t]+::g;
-
-        @args = split(",", $arglist );
-
-        $new = &fortran_name($args[$#args]);
-
-        $fline =~ s:FORTRAN_NAME\s*\(([^\)]*)\):$new:;
-    }
-    # END DEPRECATED IN BETA 9
     while($fline =~ m:CCTK_FORTRAN_COMMON_NAME\s*\(([^\)]*)\):)
     {
         $arglist = $1;