From c0b00d37294a7ee398e99038d7fd6ec168a1461b Mon Sep 17 00:00:00 2001 From: Alexandre Petit-Bianco Date: Thu, 1 Feb 2001 10:35:50 +0000 Subject: [PATCH] jcf-parse.c (init_jcf_parse): Added cast to ggc_add_root's last argument. 2001-01-30 Alexandre Petit-Bianco * jcf-parse.c (init_jcf_parse): Added cast to ggc_add_root's last argument. * parse.y (finish_method_declaration): Code accounting for WFLed method DECL_NAMEs deleted. (check_abstract_method_definitions): Likewise. (resolve_type_during_patch): Layout resolved type. * typeck.c (lookup_do): Removed unused local. (http://gcc.gnu.org/ml/gcc-patches/2001-02/msg00005.html) From-SVN: r39388 --- gcc/java/ChangeLog | 10 ++++++++++ gcc/java/jcf-parse.c | 2 +- gcc/java/parse.y | 24 +++++++----------------- gcc/java/typeck.c | 2 -- 4 files changed, 18 insertions(+), 20 deletions(-) diff --git a/gcc/java/ChangeLog b/gcc/java/ChangeLog index 5ff6bded754..d4543db010e 100644 --- a/gcc/java/ChangeLog +++ b/gcc/java/ChangeLog @@ -1,3 +1,13 @@ +2001-01-30 Alexandre Petit-Bianco + + * jcf-parse.c (init_jcf_parse): Added cast to ggc_add_root's last + argument. + * parse.y (finish_method_declaration): Code accounting for WFLed + method DECL_NAMEs deleted. + (check_abstract_method_definitions): Likewise. + (resolve_type_during_patch): Layout resolved type. + * typeck.c (lookup_do): Removed unused local. + 2000-01-30 Bryce McKinlay * java-tree.h: Remove JTI_INTEGER_NEGATIVE_ONE_NODE. diff --git a/gcc/java/jcf-parse.c b/gcc/java/jcf-parse.c index 10baf59dc5b..24eb0a30d9d 100644 --- a/gcc/java/jcf-parse.c +++ b/gcc/java/jcf-parse.c @@ -1135,5 +1135,5 @@ init_jcf_parse () /* Register roots with the garbage collector. */ ggc_add_tree_root (parse_roots, sizeof (parse_roots) / sizeof(tree)); - ggc_add_root (¤t_jcf, 1, sizeof (JCF), ggc_mark_jcf); + ggc_add_root (¤t_jcf, 1, sizeof (JCF), (void (*)(void *))ggc_mark_jcf); } diff --git a/gcc/java/parse.y b/gcc/java/parse.y index cf438e92840..d56613365be 100644 --- a/gcc/java/parse.y +++ b/gcc/java/parse.y @@ -4572,21 +4572,21 @@ finish_method_declaration (method_body) /* 8.4.5 Method Body */ if ((flags & ACC_ABSTRACT || flags & ACC_NATIVE) && method_body) { - tree wfl = DECL_NAME (current_function_decl); - parse_error_context (wfl, + tree name = DECL_NAME (current_function_decl); + parse_error_context (DECL_FUNCTION_WFL (current_function_decl), "%s method `%s' can't have a body defined", (METHOD_NATIVE (current_function_decl) ? "Native" : "Abstract"), - IDENTIFIER_POINTER (EXPR_WFL_NODE (wfl))); + IDENTIFIER_POINTER (name)); method_body = NULL_TREE; } else if (!(flags & ACC_ABSTRACT) && !(flags & ACC_NATIVE) && !method_body) { - tree wfl = DECL_NAME (current_function_decl); + tree name = DECL_NAME (current_function_decl); parse_error_context - (wfl, + (DECL_FUNCTION_WFL (current_function_decl), "Non native and non abstract method `%s' must have a body defined", - IDENTIFIER_POINTER (EXPR_WFL_NODE (wfl))); + IDENTIFIER_POINTER (name)); method_body = NULL_TREE; } @@ -5904,13 +5904,6 @@ check_abstract_method_definitions (do_interface, class_decl, type) char *t = xstrdup (lang_printable_name (TREE_TYPE (TREE_TYPE (method)), 0)); tree ccn = DECL_NAME (TYPE_NAME (DECL_CONTEXT (method))); - tree saved_wfl = NULL_TREE; - - if (TREE_CODE (DECL_NAME (method)) == EXPR_WITH_FILE_LOCATION) - { - saved_wfl = DECL_NAME (method); - DECL_NAME (method) = EXPR_WFL_NODE (DECL_NAME (method)); - } parse_error_context (lookup_cl (class_decl), @@ -5924,9 +5917,6 @@ check_abstract_method_definitions (do_interface, class_decl, type) IDENTIFIER_POINTER (DECL_NAME (class_decl))); ok = 0; free (t); - - if (saved_wfl) - DECL_NAME (method) = saved_wfl; } } @@ -13870,7 +13860,7 @@ resolve_type_during_patch (type) { if (unresolved_type_p (type, NULL)) { - tree type_decl = resolve_no_layout (EXPR_WFL_NODE (type), type); + tree type_decl = resolve_and_layout (EXPR_WFL_NODE (type), type); if (!type_decl) { parse_error_context (type, diff --git a/gcc/java/typeck.c b/gcc/java/typeck.c index 5ed5d53c9e1..83be3262dc4 100644 --- a/gcc/java/typeck.c +++ b/gcc/java/typeck.c @@ -834,8 +834,6 @@ lookup_do (searched_class, searched_interface, method_name, signature, signature method != NULL_TREE; method = TREE_CHAIN (method)) { tree method_sig = (*signature_builder) (TREE_TYPE (method)); - tree name = DECL_NAME (method); - if (DECL_NAME (method) == method_name && method_sig == signature) return method; } -- 2.30.2