objc-act.c (start_class): Register implemented_classes with GC.
* objc/objc-act.c (start_class): Register implemented_classes with GC. From-SVN: r39756
This commit is contained in:
parent
79c9efb500
commit
4f6bcad016
@ -1,3 +1,8 @@
|
|||||||
|
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>
|
2001-02-16 Neil Booth <neil@daikokuya.demon.co.uk>
|
||||||
|
|
||||||
* cppfiles.c (_cpp_make_system_header): Generate a file
|
* cppfiles.c (_cpp_make_system_header): Generate a file
|
||||||
|
@ -6130,7 +6130,10 @@ start_class (code, class_name, super_name, protocol_list)
|
|||||||
{
|
{
|
||||||
{
|
{
|
||||||
static tree implemented_classes = 0;
|
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))
|
for (chain = implemented_classes; chain; chain = TREE_CHAIN (chain))
|
||||||
if (TREE_VALUE (chain) == class_name)
|
if (TREE_VALUE (chain) == class_name)
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user