c-pragma.h (add_to_renaming_pragma_list): New function.

	* gcc/c-pragma.h (add_to_renaming_pragma_list): New function.
	* gcc/c-pragma.c (add_to_renaming_pragma_list): New function.
	(handle_pragma_redefine_extname): Change to use new function.

From-SVN: r55330

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 38fe2bfc612a5ce2e91f6f141c58a476e5a68bf0..a4e818ee0d7d736dc35384ba8f3d2ffd76cd20d6 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-07-08  Steve Ellcey  <sje@cup.hp.com>
+       * gcc/c-pragma.h (add_to_renaming_pragma_list): New function.
+       * gcc/c-pragma.c (add_to_renaming_pragma_list): New function.
+       (handle_pragma_redefine_extname): Change to use new function.
+
 2002-07-08  Roger Sayle  <roger@eyesopen.com>
 
        * combine.c (combine_simplify_rtx): Add an explicit cast

diff --git a/gcc/c-pragma.c b/gcc/c-pragma.c
index df9e1bf3c3403b97de4b8d88261791a6f4930f00..4c43baa9b0d8c7f0c116863df2bdf9534f50a1d7 100644 (file)
--- a/gcc/c-pragma.c
+++ b/gcc/c-pragma.c
@@ -383,11 +383,18 @@ handle_pragma_redefine_extname (dummy)
       SET_DECL_ASSEMBLER_NAME (decl, newname);
     }
   else
-    pending_redefine_extname
-      = tree_cons (oldname, newname, pending_redefine_extname);
+    add_to_renaming_pragma_list(oldname, newname);
 }
 #endif
 
+void
+add_to_renaming_pragma_list (oldname, newname)
+       tree oldname, newname;
+{
+  pending_redefine_extname
+    = tree_cons (oldname, newname, pending_redefine_extname);
+}
+
 static GTY(()) tree pragma_extern_prefix;
 
 #ifdef HANDLE_PRAGMA_EXTERN_PREFIX
@@ -444,7 +451,6 @@ maybe_apply_renaming_pragma (decl, asmname)
       asmname = build_string (strlen (oldasmname), oldasmname);
     }
 
-#ifdef HANDLE_PRAGMA_REDEFINE_EXTNAME
   {
     tree *p, t;
 
@@ -460,7 +466,6 @@ maybe_apply_renaming_pragma (decl, asmname)
          return build_string (strlen (newname), newname);
        }
   }
-#endif
 
 #ifdef HANDLE_PRAGMA_EXTERN_PREFIX
   if (pragma_extern_prefix && !asmname)

diff --git a/gcc/c-pragma.h b/gcc/c-pragma.h
index 8e7589f1fdd7df88ce5172310c238f60a65c5313..7911c5a65028fc5dad94a9acfe17bab388012857 100644 (file)
--- a/gcc/c-pragma.h
+++ b/gcc/c-pragma.h
@@ -62,6 +62,7 @@ extern void cpp_register_pragma PARAMS ((cpp_reader *,
 
 extern void maybe_apply_pragma_weak PARAMS ((tree));
 extern tree maybe_apply_renaming_pragma PARAMS ((tree, tree));
+extern void add_to_renaming_pragma_list PARAMS ((tree, tree));
 
 extern int c_lex PARAMS ((tree *));