* gcc-common.c (lang_mark_false_label_stack): Remove.

	* ggc.h (lang_mark_false_label_stack): Similarly.
ada:
	* misc.c (ggc_p): Remove.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@51433 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 6608a84..9cb8673 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-27  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+       * gcc-common.c (lang_mark_false_label_stack): Remove.
+       * ggc.h (lang_mark_false_label_stack): Similarly.
+
 2002-03-26  Vladimir Makarov  <vmakarov@redhat.com> 
 
        * pa/pa-pro-end.h (CPP_PREDEFINES): Add -D__pro__.

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index e33fc4a..4a47514 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2002-03-27  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+       * misc.c (ggc_p): Remove.
+
 2002-03-27  Geert Bosch  <bosch@gnat.com>
 
        * prj-makr.ads, prj-makr.adb : New files.

diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c
index 3ae66a8..bcd9dee 100644 (file)
--- a/gcc/ada/misc.c
+++ b/gcc/ada/misc.c
@@ -161,10 +161,6 @@ const char *const tree_code_name[] = {
 extern int gnat_argc;
 extern char **gnat_argv;
 
-/* Global Variables Expected by gcc: */
-
-int ggc_p = 1;
-
 static void internal_error_function    PARAMS ((const char *, va_list *));
 static rtx gnat_expand_expr            PARAMS ((tree, rtx, enum machine_mode,
                                                 enum expand_modifier));

diff --git a/gcc/ggc-common.c b/gcc/ggc-common.c
index 9c7b46d..6a6b69b 100644 (file)
--- a/gcc/ggc-common.c
+++ b/gcc/ggc-common.c
@@ -35,12 +35,6 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 /* Statistics about the allocation.  */
 static ggc_statistics *ggc_stats;
 
-/* The FALSE_LABEL_STACK, declared in except.h, has language-dependent
-   semantics.  If a front-end needs to mark the false label stack, it
-   should set this pointer to a non-NULL value.  Otherwise, no marking
-   will be done.  */
-void (*lang_mark_false_label_stack) PARAMS ((struct label_node *));
-
 /* Trees that have been marked, but whose children still need marking.  */
 varray_type ggc_pending_trees;
 

diff --git a/gcc/ggc.h b/gcc/ggc.h
index 8d65b12..5933084 100644 (file)
--- a/gcc/ggc.h
+++ b/gcc/ggc.h
@@ -177,14 +177,6 @@ extern int ggc_set_mark                    PARAMS ((const void *));
    static objects, stack variables, or memory allocated with malloc.  */
 extern int ggc_marked_p                        PARAMS ((const void *));
 
-/* Callbacks to the languages.  */
-
-/* The FALSE_LABEL_STACK, declared in except.h, has language-dependent
-   semantics.  If a front-end needs to mark the false label stack, it
-   should set this pointer to a non-NULL value.  Otherwise, no marking
-   will be done.  */
-extern void (*lang_mark_false_label_stack) PARAMS ((struct label_node *));
-
 /* Mark functions for various structs scattered about.  */
 
 void mark_eh_status                    PARAMS ((struct eh_status *));