+Sun Mar 28 22:12:10 1999 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
+
+ * class.c (maybe_add_interface): Remove unused variable
+ `interface_binfo'.
+ (make_class_data): Use = for assignment, not ==. Likewise.
+ (emit_register_classes): Remove unused variable `decl'.
+
+ * lex.c: Fix comment so as not to contain an embedded `/*'.
+
+ * verify.c (verify_jvm_instructions): Remove unused variable
+ `self_type'.
+
Sat Mar 27 15:49:18 1999 Per Bothner <bothner@cygnus.com>
* parse.y (complete_loop_body): Rename to finish_loop_body.
tree this_class, interface_class;
{
tree basetype_vec = TYPE_BINFO_BASETYPES (this_class);
- tree interface_binfo = make_tree_vec (6);
int i;
int n = TREE_VEC_LENGTH (basetype_vec);
for (i = 0; ; i++)
{
int super_index = alloc_class_constant (super);
super = build_int_2 (super_index, 0);
- TREE_TYPE (super) == ptr_type_node;
+ TREE_TYPE (super) = ptr_type_node;
}
/* Build and emit the array of implemented interfaces. */
{
int int_index = alloc_class_constant (iclass);
index = build_int_2 (int_index, 0);
- TREE_TYPE (index) == ptr_type_node;
+ TREE_TYPE (index) = ptr_type_node;
}
init = tree_cons (NULL_TREE, index, init);
}
void
emit_register_classes ()
{
- tree decl = getdecls ();
-
extern tree get_file_function_name PROTO((int));
tree init_name = get_file_function_name ('I');
tree init_type = build_function_type (void_type_node, end_params_node);
}
/* Parse the end of a C style comment.
- * C is the first character after the '/*'. */
+ * C is the first character following the '/' and '*'. */
static void
java_parse_end_comment (c)
unicode_t c;
field:
{
int index = IMMEDIATE_u2;
- tree self_type = get_class_constant
- (jcf, COMPONENT_REF_CLASS_INDEX (¤t_jcf->cpool, index));
tree field_signature = COMPONENT_REF_SIGNATURE (¤t_jcf->cpool, index);
tree field_type = get_type_from_signature (field_signature);
if (is_putting)