diff options
author | Tom Wood <wood@gnu.org> | 1993-04-12 23:52:10 +0000 |
---|---|---|
committer | Tom Wood <wood@gnu.org> | 1993-04-12 23:52:10 +0000 |
commit | 5fa63f2ada0d0f73bad0bac387789f37eabec1f5 (patch) | |
tree | f9a13d71fd30459efb89cc3b43796483975b37f1 /gcc/objc/objc-act.c | |
parent | 812207f08b1a366918b49d8e7c4b36e77f909d09 (diff) | |
download | gcc-5fa63f2ada0d0f73bad0bac387789f37eabec1f5.zip gcc-5fa63f2ada0d0f73bad0bac387789f37eabec1f5.tar.gz gcc-5fa63f2ada0d0f73bad0bac387789f37eabec1f5.tar.bz2 |
(get_static_reference, get_objcect_reference,
start_protocol): Make a tree vector for new protocol types.
(start_class): The tree vector for class types is longer.
From-SVN: r4109
Diffstat (limited to 'gcc/objc/objc-act.c')
-rw-r--r-- | gcc/objc/objc-act.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/objc/objc-act.c b/gcc/objc/objc-act.c index 1e5df40..3262b05 100644 --- a/gcc/objc/objc-act.c +++ b/gcc/objc/objc-act.c @@ -829,6 +829,7 @@ get_static_reference (interface, protocols) current_obstack = &permanent_obstack; t = copy_node (type); + TYPE_BINFO (t) = make_tree_vec (2); /* Add this type to the chain of variants of TYPE. */ TYPE_NEXT_VARIANT (t) = TYPE_NEXT_VARIANT (m); @@ -880,6 +881,7 @@ get_object_reference (protocols) current_obstack = &permanent_obstack; t = copy_node (type); + TYPE_BINFO (t) = make_tree_vec (2); /* Add this type to the chain of variants of TYPE. */ TYPE_NEXT_VARIANT (t) = TYPE_NEXT_VARIANT (m); @@ -5346,7 +5348,7 @@ start_class (code, class_name, super_name, protocol_list) objc_fatal (); class = make_node (code); - TYPE_BINFO (class) = make_tree_vec (4); + TYPE_BINFO (class) = make_tree_vec (5); CLASS_NAME (class) = class_name; CLASS_SUPER_NAME (class) = super_name; @@ -5639,6 +5641,7 @@ start_protocol (code, name, list) objc_protocol_template = build_protocol_template (); protocol = make_node (code); + TYPE_BINFO (protocol) = make_tree_vec (2); PROTOCOL_NAME (protocol) = name; PROTOCOL_LIST (protocol) = list; |