aboutsummaryrefslogtreecommitdiff
path: root/gcc/objc/objc-act.c
diff options
context:
space:
mode:
authorTom Wood <wood@gnu.org>1993-04-12 23:52:10 +0000
committerTom Wood <wood@gnu.org>1993-04-12 23:52:10 +0000
commit5fa63f2ada0d0f73bad0bac387789f37eabec1f5 (patch)
treef9a13d71fd30459efb89cc3b43796483975b37f1 /gcc/objc/objc-act.c
parent812207f08b1a366918b49d8e7c4b36e77f909d09 (diff)
downloadgcc-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.c5
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;