diff options
author | Alexandre Petit-Bianco <apbianco@redhat.com> | 2001-10-09 15:55:35 -0700 |
---|---|---|
committer | Alexandre Petit-Bianco <apbianco@gcc.gnu.org> | 2001-10-09 15:55:35 -0700 |
commit | 3fb5c0ebcfe787c4be11c9634ebc3c259a1a71ea (patch) | |
tree | 1750dcb78359a25c290d286c1824cb177883c742 /gcc/java/parse.y | |
parent | d1d8ed98776760cc06c71affb80693fb68e80460 (diff) | |
download | gcc-3fb5c0ebcfe787c4be11c9634ebc3c259a1a71ea.zip gcc-3fb5c0ebcfe787c4be11c9634ebc3c259a1a71ea.tar.gz gcc-3fb5c0ebcfe787c4be11c9634ebc3c259a1a71ea.tar.bz2 |
[multiple changes]
2001-10-09 Alexandre Petit-Bianco <apbianco@redhat.com>
* parse.y (patch_cast): Call patch_string on the first operand of
the incoming node, update it if necessary. Fixes java/4510.
2001-10-05 Alexandre Petit-Bianco <apbianco@redhat.com>
* parse.y (register_incomplete_type): Set JDEP_SUPER to be given
a NULL enclosing context if appropriate. Fixes java/4466.
2001-09-17 Alexandre Petit-Bianco <apbianco@redhat.com>
* parse.y (patch_method_invocation): Inner class creation context
check not enforced within constructors. Fixes PR java/1873.
( http://gcc.gnu.org/ml/gcc-patches/2001-10/msg00397.html )
From-SVN: r46133
Diffstat (limited to 'gcc/java/parse.y')
-rw-r--r-- | gcc/java/parse.y | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/gcc/java/parse.y b/gcc/java/parse.y index 180b99d..d007b71 100644 --- a/gcc/java/parse.y +++ b/gcc/java/parse.y @@ -5200,10 +5200,12 @@ register_incomplete_type (kind, wfl, decl, ptr) JDEP_MISC (new) = NULL_TREE; /* For some dependencies, set the enclosing class of the current class to be the enclosing context */ - if ((kind == JDEP_SUPER || kind == JDEP_INTERFACE - || kind == JDEP_ANONYMOUS) + if ((kind == JDEP_INTERFACE || kind == JDEP_ANONYMOUS) && GET_ENCLOSING_CPC ()) JDEP_ENCLOSING (new) = TREE_VALUE (GET_ENCLOSING_CPC ()); + else if (kind == JDEP_SUPER) + JDEP_ENCLOSING (new) = (GET_ENCLOSING_CPC () ? + TREE_VALUE (GET_ENCLOSING_CPC ()) : NULL_TREE); else JDEP_ENCLOSING (new) = GET_CPC (); JDEP_GET_PATCH (new) = (tree *)NULL; @@ -10255,7 +10257,8 @@ patch_method_invocation (patch, primary, where, from_super, /* Check for inner classes creation from illegal contexts */ if (lc && (INNER_CLASS_TYPE_P (class_to_search) && !CLASS_STATIC (TYPE_NAME (class_to_search))) - && INNER_ENCLOSING_SCOPE_CHECK (class_to_search)) + && INNER_ENCLOSING_SCOPE_CHECK (class_to_search) + && !DECL_INIT_P (current_function_decl)) { parse_error_context (wfl, "No enclosing instance for inner class `%s' is in scope%s", @@ -14437,10 +14440,15 @@ patch_cast (node, wfl_op) tree wfl_op; { tree op = TREE_OPERAND (node, 0); - tree op_type = TREE_TYPE (op); tree cast_type = TREE_TYPE (node); + tree patched, op_type; char *t1; + /* Some string patching might be necessary at this stage */ + if ((patched = patch_string (op))) + TREE_OPERAND (node, 0) = op = patched; + op_type = TREE_TYPE (op); + /* First resolve OP_TYPE if unresolved */ if (!(cast_type = resolve_type_during_patch (cast_type))) return error_mark_node; |