objc-act.c (start_class): Register implemented_classes with GC.

* objc/objc-act.c (start_class): Register implemented_classes with GC. From-SVN: r39756

objc-act.c (start_class): Register implemented_classes with GC.
* objc/objc-act.c (start_class): Register implemented_classes with GC. From-SVN: r39756
4f6bcad0 · Jakub Jelinek · Jakub Jelinek · 79c9efb5 · 4f6bcad0 · 4f6bcad0
Commit 4f6bcad0 authored 24 years ago by Jakub Jelinek Committed by Jakub Jelinek 24 years ago
Hide whitespace changes
Inline Side-by-side

Showing with 9 additions and 1 deletions

gcc/ChangeLog
+5 -0

gcc/objc/objc-act.c
+4 -1

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+2001-02-16  Jakub Jelinek  <jakub@redhat.com>
+
+	* objc/objc-act.c (start_class): Register implemented_classes with
+	GC.
+
 2001-02-16  Neil Booth  <neil@daikokuya.demon.co.uk>

        * cppfiles.c (_cpp_make_system_header): Generate a file

--- a/gcc/objc/objc-act.c
+++ b/gcc/objc/objc-act.c
@@ -6130,7 +6130,10 @@ start_class (code, class_name, super_name, protocol_list)
    {
      {
        static tree implemented_classes = 0;
-        tree chain = implemented_classes;
+        tree chain;
+
+	if (!implemented_classes)
+	  ggc_add_tree_root (&implemented_classes, 1);
        for (chain = implemented_classes; chain; chain = TREE_CHAIN (chain))
           if (TREE_VALUE (chain) == class_name)
 	     {