gcc-common.c (lang_mark_false_label_stack): Remove.

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

From-SVN: r51433

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 6608a84759c5a10e92575eab98a9b09bbb77393e..9cb867300f81c53838f49603443b31da4a097fe3 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 e33fc4a406c4924c4430db13c5ea59df52bf0376..4a47514ee25f9ffe19652b0e1090c5975a82f7ef 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 3ae66a83f98987ed61e4b87e644413afa852bdaf..bcd9deedef918d404c60878b9c63bca45ebea723 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 9c7b46d2b8bc4630880e7e98c8343e81593bcf0f..6a6b69b3dd8ca2022cb803e4fac9015faaadfa2f 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 8d65b12a2a516af0bc9ab878c4a280faa49e8832..5933084720f61abe8f2aff05da38f5ea74f1917d 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 *));