* expr.c (build_java_soft_divmod): Provide a default case in switch.
(java_lang_expand_expr): Mark parameters `target', `tmode' and
`modifier' with ATTRIBUTE_UNUSED.
* gjavah.c (process_file): Add braces around ambiguous `else'.
* jcf-dump.c (print_access_flags, localvar_free): Change return
type to void.
* parse.y (java_complete_expand_method): Initialize variable
`exception_copy'.
(resolve_qualified_expression_name): Likewise for `field_decl'.
(patch_method_invocation): Likewise for `class_to_search'.
(qualify_ambiguous_name): Likewise for `name' and `ptr_type'.
(patch_assignment): Likewise for `lhs_type'.
* verify.c (verify_jvm_instructions): Remove unused variable
`caller'.
From-SVN: r28344
+1999-07-30 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
+
+ * expr.c (build_java_soft_divmod): Provide a default case in switch.
+ (java_lang_expand_expr): Mark parameters `target', `tmode' and
+ `modifier' with ATTRIBUTE_UNUSED.
+
+ * gjavah.c (process_file): Add braces around ambiguous `else'.
+
+ * jcf-dump.c (print_access_flags, localvar_free): Change return
+ type to void.
+
+ * parse.y (java_complete_expand_method): Initialize variable
+ `exception_copy'.
+ (resolve_qualified_expression_name): Likewise for `field_decl'.
+ (patch_method_invocation): Likewise for `class_to_search'.
+ (qualify_ambiguous_name): Likewise for `name' and `ptr_type'.
+ (patch_assignment): Likewise for `lhs_type'.
+
+ * verify.c (verify_jvm_instructions): Remove unused variable
+ `caller'.
+
1999-07-25 Richard Henderson <rth@cygnus.com>
* decl.c (va_list_type_node): New.
case TRUNC_MOD_EXPR:
call = soft_irem_node;
break;
+ default:
+ break;
}
}
else if (type == long_type_node)
case TRUNC_MOD_EXPR:
call = soft_lrem_node;
break;
+ default:
+ break;
}
}
struct rtx_def *
java_lang_expand_expr (exp, target, tmode, modifier)
register tree exp;
- rtx target;
- enum machine_mode tmode;
- enum expand_modifier modifier;
+ rtx target ATTRIBUTE_UNUSED;
+ enum machine_mode tmode ATTRIBUTE_UNUSED;
+ enum expand_modifier modifier ATTRIBUTE_UNUSED;
{
tree current;
jcf_parse_class (jcf);
if (written_class_count++ == 0 && out)
- if (! stubs)
- fputs ("// DO NOT EDIT THIS FILE - it is machine generated -*- c++ -*-\n\n",
- out);
- else
- {
- fputs ("// This file was created by `gcjh -stubs'. It is -*- c++ -*-.
+ {
+ if (! stubs)
+ fputs ("// DO NOT EDIT THIS FILE - it is machine generated -*- c++ -*-\n\n",
+ out);
+ else
+ {
+ fputs ("// This file was created by `gcjh -stubs'. It is -*- c++ -*-.
//
// This file is intended to give you a head start on implementing native
// methods using CNI.
// Be aware: running `gcjh -stubs' once more for this class may overwrite any
// edits you have made to this file.\n\n", out);
- }
+ }
+ }
if (out)
{
/* Print in format similar to javap. VERY IMCOMPLETE. */
int flag_javap_compatible = 0;
-static int print_access_flags PROTO ((FILE *, uint16, char));
+static void print_access_flags PROTO ((FILE *, uint16, char));
static void print_constant_terse PROTO ((FILE*, JCF*, int, int));
static void print_constant PROTO ((FILE *, JCF *, int, int));
static void print_constant_ref PROTO ((FILE *, JCF *, int));
The CONTEXT is one of 'c' (class flags), 'f' (field flags),
or 'm' (method flags). */
-static int
+static void
DEFUN (print_access_flags, (stream, flags, context),
FILE *stream AND uint16 flags AND char context)
{
static struct jcf_block * get_jcf_label_here PROTO ((struct jcf_partial *));
static void put_linenumber PROTO ((int, struct jcf_partial *));
static void localvar_alloc PROTO ((tree, struct jcf_partial *));
-static int localvar_free PROTO ((tree, struct jcf_partial *));
+static void localvar_free PROTO ((tree, struct jcf_partial *));
static int get_access_flags PROTO ((tree));
static void write_chunks PROTO ((FILE *, struct chunk *));
static int adjust_typed_op PROTO ((tree, int));
}
}
-static int
+static void
localvar_free (decl, state)
tree decl;
struct jcf_partial *state;
{
tree fbody = DECL_FUNCTION_BODY (mdecl);
tree block_body = BLOCK_EXPR_BODY (fbody);
- tree exception_copy;
+ tree exception_copy = NULL_TREE;
expand_start_java_method (mdecl);
build_result_decl (mdecl);
/* We resolve and expression name */
else
{
- tree field_decl;
+ tree field_decl = NULL_TREE;
/* If there exists an early resolution, use it. That occurs
only once and we know that there are more things to
constructors */
else
{
- tree class_to_search;
+ tree class_to_search = NULL_TREE;
int lc; /* Looking for Constructor */
/* We search constructor in their target class */
qualify_ambiguous_name (id)
tree id;
{
- tree qual, qual_wfl, name, decl, ptr_type, saved_current_class;
+ tree qual, qual_wfl, name = NULL_TREE, decl, ptr_type = NULL_TREE,
+ saved_current_class;
int again, super_found = 0, this_found = 0, new_array_found = 0;
int code;
{
tree rhs = TREE_OPERAND (node, 1);
tree lvalue = TREE_OPERAND (node, 0), llvalue;
- tree lhs_type, rhs_type, new_rhs = NULL_TREE;
+ tree lhs_type = NULL_TREE, rhs_type, new_rhs = NULL_TREE;
int error_found = 0;
int lvalue_from_array = 0;
{
tree fbody = DECL_FUNCTION_BODY (mdecl);
tree block_body = BLOCK_EXPR_BODY (fbody);
- tree exception_copy;
+ tree exception_copy = NULL_TREE;
expand_start_java_method (mdecl);
build_result_decl (mdecl);
/* We resolve and expression name */
else
{
- tree field_decl;
+ tree field_decl = NULL_TREE;
/* If there exists an early resolution, use it. That occurs
only once and we know that there are more things to
constructors */
else
{
- tree class_to_search;
+ tree class_to_search = NULL_TREE;
int lc; /* Looking for Constructor */
/* We search constructor in their target class */
qualify_ambiguous_name (id)
tree id;
{
- tree qual, qual_wfl, name, decl, ptr_type, saved_current_class;
+ tree qual, qual_wfl, name = NULL_TREE, decl, ptr_type = NULL_TREE,
+ saved_current_class;
int again, super_found = 0, this_found = 0, new_array_found = 0;
int code;
{
tree rhs = TREE_OPERAND (node, 1);
tree lvalue = TREE_OPERAND (node, 0), llvalue;
- tree lhs_type, rhs_type, new_rhs = NULL_TREE;
+ tree lhs_type = NULL_TREE, rhs_type, new_rhs = NULL_TREE;
int error_found = 0;
int lvalue_from_array = 0;
else
{
tree ret_map = LABEL_RETURN_TYPE_STATE (current_subr);
- tree caller = LABEL_SUBR_CONTEXT (current_subr);
int size = DECL_MAX_LOCALS(current_function_decl)+stack_pointer;
index = wide ? IMMEDIATE_u2 : IMMEDIATE_u1;
wide = 0;