Change CCTK_IsOverloaded to CCTK_IsFunctionAliased

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

1 files changed, 13 insertions, 13 deletions

diff --git a/lib/sbin/CreateFunctionBindings.pl b/lib/sbin/CreateFunctionBindings.pl
index 240250f5..7c507538 100644
--- a/lib/sbin/CreateFunctionBindings.pl
+++ b/lib/sbin/CreateFunctionBindings.pl
@@ -26,7 +26,7 @@ sub CreateFunctionBindings
   my($function_db);
   my($registerfiles);
 
-  $registerfiles = 'IsOverloaded.c OverloadThorns.c FortranThornFunctions.c DummyThornFunctions.c RegisterThornFunctions.c';
+  $registerfiles = 'IsFunctionAliased.c OverloadThorns.c FortranThornFunctions.c DummyThornFunctions.c RegisterThornFunctions.c';
 
   # Create Function Database
   $function_db = &FunctionDatabase($rhinterface_db);
@@ -91,9 +91,9 @@ sub CreateFunctionBindings
   $dataout = &RegisterAllFunctions($rhinterface_db);
   &WriteFile('Functions/RegisterThornFunctions.c',\$dataout);
 
-  # Create IsOverloaded functions
-  $dataout = &IsOverloadedBindings($function_db);
-  &WriteFile('Functions/IsOverloaded.c',\$dataout);
+  # Create IsFunctionAliased functions
+  $dataout = &IsFunctionAliasedBindings($function_db);
+  &WriteFile('Functions/IsFunctionAliased.c',\$dataout);
 
   # Create make.code.defn
   $dataout = "SRCS = $registerfiles";
@@ -106,7 +106,7 @@ sub CreateFunctionBindings
 
 
 #/*@@
-#  @routine    IsOverloadedBindings
+#  @routine    IsFunctionAliasedBindings
 #  @date       Tue Feb 20 2001
 #  @author     Gabrielle Allen
 #  @desc
@@ -116,14 +116,14 @@ sub CreateFunctionBindings
 #  @enddesc
 #@@*/
 
-sub IsOverloadedBindings
+sub IsFunctionAliasedBindings
 {
   my($function_db) = @_;
   my(@data) = ();
 
   # Header Data
   push(@data, '/*@@');
-  push(@data, '   @file    IsOverloaded.c');
+  push(@data, '   @file    IsFunctionAliased.c');
   push(@data, '   @author  Automatically generated by CreateFunctionBindings.pl');
   push(@data, '   @desc');
   push(@data, '            Query how many times a function is overloaded');
@@ -146,8 +146,8 @@ sub IsOverloadedBindings
     }
   }
 
-  push(@data, 'int CCTK_IsOverloaded(const char *function);');
-  push(@data, 'int CCTK_IsOverloaded(const char *function)');
+  push(@data, 'int CCTK_IsFunctionAliased(const char *function);');
+  push(@data, 'int CCTK_IsFunctionAliased(const char *function)');
   push(@data, '{');
   push(@data, '  int retval = 0;');
   push(@data, '');
@@ -171,11 +171,11 @@ sub IsOverloadedBindings
   push(@data, '');
 
   # Put fortran binding here for the moment
-  push(@data, 'void CCTK_FCALL CCTK_FNAME(CCTK_IsOverloaded) (int *ret, ONE_FORTSTRING_ARG);');
-  push(@data, 'void CCTK_FCALL CCTK_FNAME(CCTK_IsOverloaded) (int *ret, ONE_FORTSTRING_ARG)');
+  push(@data, 'void CCTK_FCALL CCTK_FNAME(CCTK_IsFunctionAliased) (int *ret, ONE_FORTSTRING_ARG);');
+  push(@data, 'void CCTK_FCALL CCTK_FNAME(CCTK_IsFunctionAliased) (int *ret, ONE_FORTSTRING_ARG)');
   push(@data, '{');
   push(@data, '  ONE_FORTSTRING_CREATE(name);');
-  push(@data, '  *ret = CCTK_IsOverloaded(name);');
+  push(@data, '  *ret = CCTK_IsFunctionAliased(name);');
   push(@data, '  free(name);');
   push(@data, '}');
   push(@data, "\n");   # workaround for perl 5.004_04 to add a trailing newline
@@ -289,7 +289,7 @@ sub ThornMasterIncludes
   push(@data, '');
 
   push(@data, '#ifdef CCODE');
-  push(@data, 'int CCTK_IsOverloaded(const char *function);');
+  push(@data, 'int CCTK_IsFunctionAliased(const char *function);');
   push(@data, '');
   push(@data, '#endif');
   push(@data, '');