diff options
author | Alexandre Petit-Bianco <apbianco@cygnus.com> | 2000-10-30 02:37:25 +0000 |
---|---|---|
committer | Alexandre Petit-Bianco <apbianco@gcc.gnu.org> | 2000-10-29 18:37:25 -0800 |
commit | 2cb3951d3277847945a0c1cc1516fdcde59a1912 (patch) | |
tree | f99896e3408c47839acc86752cecc450e462ec05 /gcc/java | |
parent | 661a98d17ace6fdf2aa293528f175e882ac8981c (diff) | |
download | gcc-2cb3951d3277847945a0c1cc1516fdcde59a1912.zip gcc-2cb3951d3277847945a0c1cc1516fdcde59a1912.tar.gz gcc-2cb3951d3277847945a0c1cc1516fdcde59a1912.tar.bz2 |
parse.y (patch_method_invocation): NULLify this_arg when already inserted.
2000-10-25 Alexandre Petit-Bianco <apbianco@cygnus.com>
* parse.y (patch_method_invocation): NULLify this_arg when already
inserted.
(maybe_use_access_method): Handle call to methods unrelated to the
current class. Fixed comment.
Fixes gcj/361.
(http://sources.redhat.com/ml/java-prs/2000-q4/msg00072.html
http://gcc.gnu.org/ml/gcc-patches/2000-10/msg00993.html)
From-SVN: r37139
Diffstat (limited to 'gcc/java')
-rw-r--r-- | gcc/java/ChangeLog | 8 | ||||
-rw-r--r-- | gcc/java/parse.y | 10 |
2 files changed, 15 insertions, 3 deletions
diff --git a/gcc/java/ChangeLog b/gcc/java/ChangeLog index 78d2cf8..363b6da 100644 --- a/gcc/java/ChangeLog +++ b/gcc/java/ChangeLog @@ -10,6 +10,14 @@ * Makefile.in: Delete. * config-lang.in: Delete outputs= line. +2000-10-25 Alexandre Petit-Bianco <apbianco@cygnus.com> + + * parse.y (patch_method_invocation): NULLify this_arg when already + inserted. + (maybe_use_access_method): Handle call to methods unrelated to the + current class. Fixed comment. + Fixes gcj/361. + 2000-10-24 Tom Tromey <tromey@cygnus.com> * lex.c (java_new_lexer): Initialize new fields. Work around diff --git a/gcc/java/parse.y b/gcc/java/parse.y index fce7564..b705fc6 100644 --- a/gcc/java/parse.y +++ b/gcc/java/parse.y @@ -9930,7 +9930,10 @@ patch_method_invocation (patch, primary, where, is_static, ret_decl) argument list. In the meantime, the selected function might have be replaced by a generated stub. */ if (maybe_use_access_method (is_super_init, &list, &this_arg)) - args = tree_cons (NULL_TREE, this_arg, args); + { + args = tree_cons (NULL_TREE, this_arg, args); + this_arg = NULL_TREE; /* So it doesn't get chained twice */ + } } } @@ -10086,9 +10089,10 @@ maybe_use_access_method (is_super_init, mdecl, this_arg) /* If we're calling a method found in an enclosing class, generate what it takes to retrieve the right this. Don't do that if we're - invoking a static method. */ + invoking a static method. Note that if MD's type is unrelated to + CURRENT_CLASS, then the current this can be used. */ - if (non_static_context) + if (non_static_context && DECL_CONTEXT (md) != object_type_node) { ctx = TREE_TYPE (DECL_CONTEXT (TYPE_NAME (current_class))); if (inherits_from_p (ctx, DECL_CONTEXT (md))) |