jdk8-mips64-public/langtools: src/share/classes/com/sun/tools/javac/comp/DeferredAttr.java@acd64168cf8b (annotated)

src/share/classes/com/sun/tools/javac/comp/DeferredAttr.java@acd64168cf8b (annotated)

src/share/classes/com/sun/tools/javac/comp/DeferredAttr.java

Tue, 22 Apr 2014 17:55:22 +0100

author: vromero
date: Tue, 22 Apr 2014 17:55:22 +0100
changeset 2370: acd64168cf8b
parent 2193: d4cbb671de1c
child 2382: 14979dd5e034
permissions: -rw-r--r--

8029718: Should always use lambda body structure to disambiguate overload resolution
Reviewed-by: dlsmith, jjg, jlahoda

 /*
  * Copyright (c) 2012, 2014, Oracle and/or its affiliates. All rights reserved.
  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
  *
  * This code is free software; you can redistribute it and/or modify it
  * under the terms of the GNU General Public License version 2 only, as
  * published by the Free Software Foundation.  Oracle designates this
  * particular file as subject to the "Classpath" exception as provided
  * by Oracle in the LICENSE file that accompanied this code.
  *
  * This code is distributed in the hope that it will be useful, but WITHOUT
  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  * version 2 for more details (a copy is included in the LICENSE file that
  * accompanied this code).
  *
  * You should have received a copy of the GNU General Public License version
  * 2 along with this work; if not, write to the Free Software Foundation,
  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  *
  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  * or visit www.oracle.com if you need additional information or have any
  * questions.
  */
 package com.sun.tools.javac.comp;
 import com.sun.source.tree.LambdaExpressionTree.BodyKind;
 import com.sun.tools.javac.code.*;
 import com.sun.tools.javac.tree.*;
 import com.sun.tools.javac.util.*;
 import com.sun.tools.javac.util.JCDiagnostic.DiagnosticPosition;
 import com.sun.tools.javac.code.Symbol.*;
 import com.sun.tools.javac.code.Type.*;
 import com.sun.tools.javac.comp.Attr.ResultInfo;
 import com.sun.tools.javac.comp.Infer.InferenceContext;
 import com.sun.tools.javac.comp.Resolve.MethodResolutionPhase;
 import com.sun.tools.javac.tree.JCTree.*;
 import java.util.ArrayList;
 import java.util.Collections;
 import java.util.EnumSet;
 import java.util.LinkedHashMap;
 import java.util.LinkedHashSet;
 import java.util.Map;
 import java.util.Set;
 import java.util.WeakHashMap;
 import static com.sun.tools.javac.code.Kinds.VAL;
 import static com.sun.tools.javac.code.TypeTag.*;
 import static com.sun.tools.javac.tree.JCTree.Tag.*;
 /**
  * This is an helper class that is used to perform deferred type-analysis.
  * Each time a poly expression occurs in argument position, javac attributes it
  * with a temporary 'deferred type' that is checked (possibly multiple times)
  * against an expected formal type.
  *
  *  <p><b>This is NOT part of any supported API.
  *  If you write code that depends on this, you do so at your own risk.
  *  This code and its internal interfaces are subject to change or
  *  deletion without notice.</b>
  */
 public class DeferredAttr extends JCTree.Visitor {
     protected static final Context.Key<DeferredAttr> deferredAttrKey =
         new Context.Key<DeferredAttr>();
     final Attr attr;
     final Check chk;
     final JCDiagnostic.Factory diags;
     final Enter enter;
     final Infer infer;
     final Resolve rs;
     final Log log;
     final Symtab syms;
     final TreeMaker make;
     final Types types;
     final Flow flow;
     final Names names;
     public static DeferredAttr instance(Context context) {
         DeferredAttr instance = context.get(deferredAttrKey);
         if (instance == null)
             instance = new DeferredAttr(context);
         return instance;
     }
     protected DeferredAttr(Context context) {
         context.put(deferredAttrKey, this);
         attr = Attr.instance(context);
         chk = Check.instance(context);
         diags = JCDiagnostic.Factory.instance(context);
         enter = Enter.instance(context);
         infer = Infer.instance(context);
         rs = Resolve.instance(context);
         log = Log.instance(context);
         syms = Symtab.instance(context);
         make = TreeMaker.instance(context);
         types = Types.instance(context);
         flow = Flow.instance(context);
         names = Names.instance(context);
         stuckTree = make.Ident(names.empty).setType(Type.stuckType);
         emptyDeferredAttrContext =
             new DeferredAttrContext(AttrMode.CHECK, null, MethodResolutionPhase.BOX, infer.emptyContext, null, null) {
                 @Override
                 void addDeferredAttrNode(DeferredType dt, ResultInfo ri, DeferredStuckPolicy deferredStuckPolicy) {
                     Assert.error("Empty deferred context!");
                 }
                 @Override
                 void complete() {
                     Assert.error("Empty deferred context!");
                 }
             };
     }
     /** shared tree for stuck expressions */
     final JCTree stuckTree;
     /**
      * This type represents a deferred type. A deferred type starts off with
      * no information on the underlying expression type. Such info needs to be
      * discovered through type-checking the deferred type against a target-type.
      * Every deferred type keeps a pointer to the AST node from which it originated.
      */
     public class DeferredType extends Type {
         public JCExpression tree;
         Env<AttrContext> env;
         AttrMode mode;
         SpeculativeCache speculativeCache;
         DeferredType(JCExpression tree, Env<AttrContext> env) {
             super(null);
             this.tree = tree;
             this.env = attr.copyEnv(env);
             this.speculativeCache = new SpeculativeCache();
         }
         @Override
         public TypeTag getTag() {
             return DEFERRED;
         }
         @Override
         public String toString() {
             return "DeferredType";
         }
         /**
          * A speculative cache is used to keep track of all overload resolution rounds
          * that triggered speculative attribution on a given deferred type. Each entry
          * stores a pointer to the speculative tree and the resolution phase in which the entry
          * has been added.
          */
         class SpeculativeCache {
             private Map<Symbol, List<Entry>> cache =
                     new WeakHashMap<Symbol, List<Entry>>();
             class Entry {
                 JCTree speculativeTree;
                 ResultInfo resultInfo;
                 public Entry(JCTree speculativeTree, ResultInfo resultInfo) {
                     this.speculativeTree = speculativeTree;
                     this.resultInfo = resultInfo;
                 }
                 boolean matches(MethodResolutionPhase phase) {
                     return resultInfo.checkContext.deferredAttrContext().phase == phase;
                 }
             }
             /**
              * Retrieve a speculative cache entry corresponding to given symbol
              * and resolution phase
              */
             Entry get(Symbol msym, MethodResolutionPhase phase) {
                 List<Entry> entries = cache.get(msym);
                 if (entries == null) return null;
                 for (Entry e : entries) {
                     if (e.matches(phase)) return e;
                 }
                 return null;
             }
             /**
              * Stores a speculative cache entry corresponding to given symbol
              * and resolution phase
              */
             void put(JCTree speculativeTree, ResultInfo resultInfo) {
                 Symbol msym = resultInfo.checkContext.deferredAttrContext().msym;
                 List<Entry> entries = cache.get(msym);
                 if (entries == null) {
                     entries = List.nil();
                 }
                 cache.put(msym, entries.prepend(new Entry(speculativeTree, resultInfo)));
             }
         }
         /**
          * Get the type that has been computed during a speculative attribution round
          */
         Type speculativeType(Symbol msym, MethodResolutionPhase phase) {
             SpeculativeCache.Entry e = speculativeCache.get(msym, phase);
             return e != null ? e.speculativeTree.type : Type.noType;
         }
         /**
          * Check a deferred type against a potential target-type. Depending on
          * the current attribution mode, a normal vs. speculative attribution
          * round is performed on the underlying AST node. There can be only one
          * speculative round for a given target method symbol; moreover, a normal
          * attribution round must follow one or more speculative rounds.
          */
         Type check(ResultInfo resultInfo) {
             DeferredStuckPolicy deferredStuckPolicy;
             if (resultInfo.pt.hasTag(NONE) || resultInfo.pt.isErroneous()) {
                 deferredStuckPolicy = dummyStuckPolicy;
             } else if (resultInfo.checkContext.deferredAttrContext().mode == AttrMode.SPECULATIVE) {
                 deferredStuckPolicy = new OverloadStuckPolicy(resultInfo, this);
             } else {
                 deferredStuckPolicy = new CheckStuckPolicy(resultInfo, this);
             }
             return check(resultInfo, deferredStuckPolicy, basicCompleter);
         }
         private Type check(ResultInfo resultInfo, DeferredStuckPolicy deferredStuckPolicy,
                 DeferredTypeCompleter deferredTypeCompleter) {
             DeferredAttrContext deferredAttrContext =
                     resultInfo.checkContext.deferredAttrContext();
             Assert.check(deferredAttrContext != emptyDeferredAttrContext);
             if (deferredStuckPolicy.isStuck()) {
                 deferredAttrContext.addDeferredAttrNode(this, resultInfo, deferredStuckPolicy);
                 return Type.noType;
             } else {
                 try {
                     return deferredTypeCompleter.complete(this, resultInfo, deferredAttrContext);
                 } finally {
                     mode = deferredAttrContext.mode;
                 }
             }
         }
     }
     /**
      * A completer for deferred types. Defines an entry point for type-checking
      * a deferred type.
      */
     interface DeferredTypeCompleter {
         /**
          * Entry point for type-checking a deferred type. Depending on the
          * circumstances, type-checking could amount to full attribution
          * or partial structural check (aka potential applicability).
          */
         Type complete(DeferredType dt, ResultInfo resultInfo, DeferredAttrContext deferredAttrContext);
     }
     /**
      * A basic completer for deferred types. This completer type-checks a deferred type
      * using attribution; depending on the attribution mode, this could be either standard
      * or speculative attribution.
      */
     DeferredTypeCompleter basicCompleter = new DeferredTypeCompleter() {
         public Type complete(DeferredType dt, ResultInfo resultInfo, DeferredAttrContext deferredAttrContext) {
             switch (deferredAttrContext.mode) {
                 case SPECULATIVE:
                     //Note: if a symbol is imported twice we might do two identical
                     //speculative rounds...
                     Assert.check(dt.mode == null || dt.mode == AttrMode.SPECULATIVE);
                     JCTree speculativeTree = attribSpeculative(dt.tree, dt.env, resultInfo);
                     dt.speculativeCache.put(speculativeTree, resultInfo);
                     return speculativeTree.type;
                 case CHECK:
                     Assert.check(dt.mode != null);
                     return attr.attribTree(dt.tree, dt.env, resultInfo);
             }
             Assert.error();
             return null;
         }
     };
     DeferredTypeCompleter dummyCompleter = new DeferredTypeCompleter() {
         public Type complete(DeferredType dt, ResultInfo resultInfo, DeferredAttrContext deferredAttrContext) {
             Assert.check(deferredAttrContext.mode == AttrMode.CHECK);
             return dt.tree.type = Type.stuckType;
         }
     };
     /**
      * Policy for detecting stuck expressions. Different criteria might cause
      * an expression to be judged as stuck, depending on whether the check
      * is performed during overload resolution or after most specific.
      */
     interface DeferredStuckPolicy {
         /**
          * Has the policy detected that a given expression should be considered stuck?
          */
         boolean isStuck();
         /**
          * Get the set of inference variables a given expression depends upon.
          */
         Set<Type> stuckVars();
         /**
          * Get the set of inference variables which might get new constraints
          * if a given expression is being type-checked.
          */
         Set<Type> depVars();
     }
     /**
      * Basic stuck policy; an expression is never considered to be stuck.
      */
     DeferredStuckPolicy dummyStuckPolicy = new DeferredStuckPolicy() {
         @Override
         public boolean isStuck() {
             return false;
         }
         @Override
         public Set<Type> stuckVars() {
             return Collections.emptySet();
         }
         @Override
         public Set<Type> depVars() {
             return Collections.emptySet();
         }
     };
     /**
      * The 'mode' in which the deferred type is to be type-checked
      */
     public enum AttrMode {
         /**
          * A speculative type-checking round is used during overload resolution
          * mainly to generate constraints on inference variables. Side-effects
          * arising from type-checking the expression associated with the deferred
          * type are reversed after the speculative round finishes. This means the
          * expression tree will be left in a blank state.
          */
         SPECULATIVE,
         /**
          * This is the plain type-checking mode. Produces side-effects on the underlying AST node
          */
         CHECK;
     }
     /**
      * Routine that performs speculative type-checking; the input AST node is
      * cloned (to avoid side-effects cause by Attr) and compiler state is
      * restored after type-checking. All diagnostics (but critical ones) are
      * disabled during speculative type-checking.
      */
     JCTree attribSpeculative(JCTree tree, Env<AttrContext> env, ResultInfo resultInfo) {
         final JCTree newTree = new TreeCopier<Object>(make).copy(tree);
         Env<AttrContext> speculativeEnv = env.dup(newTree, env.info.dup(env.info.scope.dupUnshared()));
         speculativeEnv.info.scope.owner = env.info.scope.owner;
         Log.DeferredDiagnosticHandler deferredDiagnosticHandler =
                 new Log.DeferredDiagnosticHandler(log, new Filter<JCDiagnostic>() {
             public boolean accepts(final JCDiagnostic d) {
                 class PosScanner extends TreeScanner {
                     boolean found = false;
                     @Override
                     public void scan(JCTree tree) {
                         if (tree != null &&
                                 tree.pos() == d.getDiagnosticPosition()) {
                             found = true;
                         }
                         super.scan(tree);
                     }
                 };
                 PosScanner posScanner = new PosScanner();
                 posScanner.scan(newTree);
                 return posScanner.found;
             }
         });
         try {
             attr.attribTree(newTree, speculativeEnv, resultInfo);
             unenterScanner.scan(newTree);
             return newTree;
         } finally {
             unenterScanner.scan(newTree);
             log.popDiagnosticHandler(deferredDiagnosticHandler);
         }
     }
     //where
         protected UnenterScanner unenterScanner = new UnenterScanner();
         class UnenterScanner extends TreeScanner {
             @Override
             public void visitClassDef(JCClassDecl tree) {
                 ClassSymbol csym = tree.sym;
                 //if something went wrong during method applicability check
                 //it is possible that nested expressions inside argument expression
                 //are left unchecked - in such cases there's nothing to clean up.
                 if (csym == null) return;
                 enter.typeEnvs.remove(csym);
                 chk.compiled.remove(csym.flatname);
                 syms.classes.remove(csym.flatname);
                 super.visitClassDef(tree);
             }
         }
     /**
      * A deferred context is created on each method check. A deferred context is
      * used to keep track of information associated with the method check, such as
      * the symbol of the method being checked, the overload resolution phase,
      * the kind of attribution mode to be applied to deferred types and so forth.
      * As deferred types are processed (by the method check routine) stuck AST nodes
      * are added (as new deferred attribution nodes) to this context. The complete()
      * routine makes sure that all pending nodes are properly processed, by
      * progressively instantiating all inference variables on which one or more
      * deferred attribution node is stuck.
      */
     class DeferredAttrContext {
         /** attribution mode */
         final AttrMode mode;
         /** symbol of the method being checked */
         final Symbol msym;
         /** method resolution step */
         final Resolve.MethodResolutionPhase phase;
         /** inference context */
         final InferenceContext inferenceContext;
         /** parent deferred context */
         final DeferredAttrContext parent;
         /** Warner object to report warnings */
         final Warner warn;
         /** list of deferred attribution nodes to be processed */
         ArrayList<DeferredAttrNode> deferredAttrNodes = new ArrayList<DeferredAttrNode>();
         DeferredAttrContext(AttrMode mode, Symbol msym, MethodResolutionPhase phase,
                 InferenceContext inferenceContext, DeferredAttrContext parent, Warner warn) {
             this.mode = mode;
             this.msym = msym;
             this.phase = phase;
             this.parent = parent;
             this.warn = warn;
             this.inferenceContext = inferenceContext;
         }
         /**
          * Adds a node to the list of deferred attribution nodes - used by Resolve.rawCheckArgumentsApplicable
          * Nodes added this way act as 'roots' for the out-of-order method checking process.
          */
         void addDeferredAttrNode(final DeferredType dt, ResultInfo resultInfo,
                 DeferredStuckPolicy deferredStuckPolicy) {
             deferredAttrNodes.add(new DeferredAttrNode(dt, resultInfo, deferredStuckPolicy));
         }
         /**
          * Incrementally process all nodes, by skipping 'stuck' nodes and attributing
          * 'unstuck' ones. If at any point no progress can be made (no 'unstuck' nodes)
          * some inference variable might get eagerly instantiated so that all nodes
          * can be type-checked.
          */
         void complete() {
             while (!deferredAttrNodes.isEmpty()) {
                 Map<Type, Set<Type>> depVarsMap = new LinkedHashMap<Type, Set<Type>>();
                 List<Type> stuckVars = List.nil();
                 boolean progress = false;
                 //scan a defensive copy of the node list - this is because a deferred
                 //attribution round can add new nodes to the list
                 for (DeferredAttrNode deferredAttrNode : List.from(deferredAttrNodes)) {
                     if (!deferredAttrNode.process(this)) {
                         List<Type> restStuckVars =
                                 List.from(deferredAttrNode.deferredStuckPolicy.stuckVars())
                                 .intersect(inferenceContext.restvars());
                         stuckVars = stuckVars.prependList(restStuckVars);
                         //update dependency map
                         for (Type t : List.from(deferredAttrNode.deferredStuckPolicy.depVars())
                                 .intersect(inferenceContext.restvars())) {
                             Set<Type> prevDeps = depVarsMap.get(t);
                             if (prevDeps == null) {
                                 prevDeps = new LinkedHashSet<Type>();
                                 depVarsMap.put(t, prevDeps);
                             }
                             prevDeps.addAll(restStuckVars);
                         }
                     } else {
                         deferredAttrNodes.remove(deferredAttrNode);
                         progress = true;
                     }
                 }
                 if (!progress) {
                     DeferredAttrContext dac = this;
                     while (dac != emptyDeferredAttrContext) {
                         if (dac.mode == AttrMode.SPECULATIVE) {
                             //unsticking does not take place during overload
                             break;
                         }
                         dac = dac.parent;
                     }
                     //remove all variables that have already been instantiated
                     //from the list of stuck variables
                     try {
                         inferenceContext.solveAny(stuckVars, depVarsMap, warn);
                         inferenceContext.notifyChange();
                     } catch (Infer.GraphStrategy.NodeNotFoundException ex) {
                         //this means that we are in speculative mode and the
                         //set of contraints are too tight for progess to be made.
                         //Just leave the remaining expressions as stuck.
                         break;
                     }
                 }
             }
         }
     }
     /**
      * Class representing a deferred attribution node. It keeps track of
      * a deferred type, along with the expected target type information.
      */
     class DeferredAttrNode {
         /** underlying deferred type */
         DeferredType dt;
         /** underlying target type information */
         ResultInfo resultInfo;
         /** stuck policy associated with this node */
         DeferredStuckPolicy deferredStuckPolicy;
         DeferredAttrNode(DeferredType dt, ResultInfo resultInfo, DeferredStuckPolicy deferredStuckPolicy) {
             this.dt = dt;
             this.resultInfo = resultInfo;
             this.deferredStuckPolicy = deferredStuckPolicy;
         }
         /**
          * Process a deferred attribution node.
          * Invariant: a stuck node cannot be processed.
          */
         @SuppressWarnings("fallthrough")
         boolean process(final DeferredAttrContext deferredAttrContext) {
             switch (deferredAttrContext.mode) {
                 case SPECULATIVE:
                     if (deferredStuckPolicy.isStuck()) {
                         dt.check(resultInfo, dummyStuckPolicy, new StructuralStuckChecker());
                         return true;
                     } else {
                         Assert.error("Cannot get here");
                     }
                 case CHECK:
                     if (deferredStuckPolicy.isStuck()) {
                         //stuck expression - see if we can propagate
                         if (deferredAttrContext.parent != emptyDeferredAttrContext &&
                                 Type.containsAny(deferredAttrContext.parent.inferenceContext.inferencevars,
                                         List.from(deferredStuckPolicy.stuckVars()))) {
                             deferredAttrContext.parent.addDeferredAttrNode(dt,
                                     resultInfo.dup(new Check.NestedCheckContext(resultInfo.checkContext) {
                                 @Override
                                 public InferenceContext inferenceContext() {
                                     return deferredAttrContext.parent.inferenceContext;
                                 }
                                 @Override
                                 public DeferredAttrContext deferredAttrContext() {
                                     return deferredAttrContext.parent;
                                 }
                             }), deferredStuckPolicy);
                             dt.tree.type = Type.stuckType;
                             return true;
                         } else {
                             return false;
                         }
                     } else {
                         ResultInfo instResultInfo =
                                 resultInfo.dup(deferredAttrContext.inferenceContext.asInstType(resultInfo.pt));
                         dt.check(instResultInfo, dummyStuckPolicy, basicCompleter);
                         return true;
                     }
                 default:
                     throw new AssertionError("Bad mode");
             }
         }
         /**
          * Structural checker for stuck expressions
          */
         class StructuralStuckChecker extends TreeScanner implements DeferredTypeCompleter {
             ResultInfo resultInfo;
             InferenceContext inferenceContext;
             Env<AttrContext> env;
             public Type complete(DeferredType dt, ResultInfo resultInfo, DeferredAttrContext deferredAttrContext) {
                 this.resultInfo = resultInfo;
                 this.inferenceContext = deferredAttrContext.inferenceContext;
                 this.env = dt.env;
                 dt.tree.accept(this);
                 dt.speculativeCache.put(stuckTree, resultInfo);
                 return Type.noType;
             }
             @Override
             public void visitLambda(JCLambda tree) {
                 Check.CheckContext checkContext = resultInfo.checkContext;
                 Type pt = resultInfo.pt;
                 if (!inferenceContext.inferencevars.contains(pt)) {
                     //must be a functional descriptor
                     Type descriptorType = null;
                     try {
                         descriptorType = types.findDescriptorType(pt);
                     } catch (Types.FunctionDescriptorLookupError ex) {
                         checkContext.report(null, ex.getDiagnostic());
                     }
                     if (descriptorType.getParameterTypes().length() != tree.params.length()) {
                         checkContext.report(tree,
                                 diags.fragment("incompatible.arg.types.in.lambda"));
                     }
                     Type currentReturnType = descriptorType.getReturnType();
                     boolean returnTypeIsVoid = currentReturnType.hasTag(VOID);
                     if (tree.getBodyKind() == BodyKind.EXPRESSION) {
                         boolean isExpressionCompatible = !returnTypeIsVoid ||
                             TreeInfo.isExpressionStatement((JCExpression)tree.getBody());
                         if (!isExpressionCompatible) {
                             resultInfo.checkContext.report(tree.pos(),
                                 diags.fragment("incompatible.ret.type.in.lambda",
                                     diags.fragment("missing.ret.val", currentReturnType)));
                         }
                     } else {
                         LambdaBodyStructChecker lambdaBodyChecker =
                                 new LambdaBodyStructChecker();
                         tree.body.accept(lambdaBodyChecker);
                         boolean isVoidCompatible = lambdaBodyChecker.isVoidCompatible;
                         if (returnTypeIsVoid) {
                             if (!isVoidCompatible) {
                                 resultInfo.checkContext.report(tree.pos(),
                                     diags.fragment("unexpected.ret.val"));
                             }
                         } else {
                             boolean isValueCompatible = lambdaBodyChecker.isPotentiallyValueCompatible
                                 && !canLambdaBodyCompleteNormally(tree);
                             if (!isValueCompatible && !isVoidCompatible) {
                                 log.error(tree.body.pos(),
                                     "lambda.body.neither.value.nor.void.compatible");
                             }
                             if (!isValueCompatible) {
                                 resultInfo.checkContext.report(tree.pos(),
                                     diags.fragment("incompatible.ret.type.in.lambda",
                                         diags.fragment("missing.ret.val", currentReturnType)));
                             }
                         }
                     }
                 }
             }
             boolean canLambdaBodyCompleteNormally(JCLambda tree) {
                 JCLambda newTree = new TreeCopier<>(make).copy(tree);
                 /* attr.lambdaEnv will create a meaningful env for the
                  * lambda expression. This is specially useful when the
                  * lambda is used as the init of a field. But we need to
                  * remove any added symbol.
                  */
                 Env<AttrContext> localEnv = attr.lambdaEnv(newTree, env);
                 try {
                     List<JCVariableDecl> tmpParams = newTree.params;
                     while (tmpParams.nonEmpty()) {
                         tmpParams.head.vartype = make.at(tmpParams.head).Type(syms.errType);
                         tmpParams = tmpParams.tail;
                     }
                     attr.attribStats(newTree.params, localEnv);
                     /* set pt to Type.noType to avoid generating any bound
                      * which may happen if lambda's return type is an
                      * inference variable
                      */
                     Attr.ResultInfo bodyResultInfo = attr.new ResultInfo(VAL, Type.noType);
                     localEnv.info.returnResult = bodyResultInfo;
                     // discard any log output
                     Log.DiagnosticHandler diagHandler = new Log.DiscardDiagnosticHandler(log);
                     try {
                         JCBlock body = (JCBlock)newTree.body;
                         /* we need to attribute the lambda body before
                          * doing the aliveness analysis. This is because
                          * constant folding occurs during attribution
                          * and the reachability of some statements depends
                          * on constant values, for example:
                          *
                          *     while (true) {...}
                          */
                         attr.attribStats(body.stats, localEnv);
                         attr.preFlow(newTree);
                         /* make an aliveness / reachability analysis of the lambda
                          * to determine if it can complete normally
                          */
                         flow.analyzeLambda(localEnv, newTree, make, true);
                     } finally {
                         log.popDiagnosticHandler(diagHandler);
                     }
                     return newTree.canCompleteNormally;
                 } finally {
                     JCBlock body = (JCBlock)newTree.body;
                     unenterScanner.scan(body.stats);
                     localEnv.info.scope.leave();
                 }
             }
             @Override
             public void visitNewClass(JCNewClass tree) {
                 //do nothing
             }
             @Override
             public void visitApply(JCMethodInvocation tree) {
                 //do nothing
             }
             @Override
             public void visitReference(JCMemberReference tree) {
                 Check.CheckContext checkContext = resultInfo.checkContext;
                 Type pt = resultInfo.pt;
                 if (!inferenceContext.inferencevars.contains(pt)) {
                     try {
                         types.findDescriptorType(pt);
                     } catch (Types.FunctionDescriptorLookupError ex) {
                         checkContext.report(null, ex.getDiagnostic());
                     }
                     Env<AttrContext> localEnv = env.dup(tree);
                     JCExpression exprTree = (JCExpression)attribSpeculative(tree.getQualifierExpression(), localEnv,
                             attr.memberReferenceQualifierResult(tree));
                     ListBuffer<Type> argtypes = new ListBuffer<>();
                     for (Type t : types.findDescriptorType(pt).getParameterTypes()) {
                         argtypes.append(Type.noType);
                     }
                     JCMemberReference mref2 = new TreeCopier<Void>(make).copy(tree);
                     mref2.expr = exprTree;
                     Symbol lookupSym =
                             rs.resolveMemberReferenceByArity(localEnv, mref2, exprTree.type,
                                 tree.name, argtypes.toList(), inferenceContext);
                     switch (lookupSym.kind) {
                         //note: as argtypes are erroneous types, type-errors must
                         //have been caused by arity mismatch
                         case Kinds.ABSENT_MTH:
                         case Kinds.WRONG_MTH:
                         case Kinds.WRONG_MTHS:
                         case Kinds.WRONG_STATICNESS:
                            checkContext.report(tree, diags.fragment("incompatible.arg.types.in.mref"));
                     }
                 }
             }
         }
         /* This visitor looks for return statements, its analysis will determine if
          * a lambda body is void or value compatible. We must analyze return
          * statements contained in the lambda body only, thus any return statement
          * contained in an inner class or inner lambda body, should be ignored.
          */
         class LambdaBodyStructChecker extends TreeScanner {
             boolean isVoidCompatible = true;
             boolean isPotentiallyValueCompatible = true;
             @Override
             public void visitClassDef(JCClassDecl tree) {
                 // do nothing
             }
             @Override
             public void visitLambda(JCLambda tree) {
                 // do nothing
             }
             @Override
             public void visitNewClass(JCNewClass tree) {
                 // do nothing
             }
             @Override
             public void visitReturn(JCReturn tree) {
                 if (tree.expr != null) {
                     isVoidCompatible = false;
                 } else {
                     isPotentiallyValueCompatible = false;
                 }
             }
         }
     }
     /** an empty deferred attribution context - all methods throw exceptions */
     final DeferredAttrContext emptyDeferredAttrContext;
     /**
      * Map a list of types possibly containing one or more deferred types
      * into a list of ordinary types. Each deferred type D is mapped into a type T,
      * where T is computed by retrieving the type that has already been
      * computed for D during a previous deferred attribution round of the given kind.
      */
     class DeferredTypeMap extends Type.Mapping {
         DeferredAttrContext deferredAttrContext;
         protected DeferredTypeMap(AttrMode mode, Symbol msym, MethodResolutionPhase phase) {
             super(String.format("deferredTypeMap[%s]", mode));
             this.deferredAttrContext = new DeferredAttrContext(mode, msym, phase,
                     infer.emptyContext, emptyDeferredAttrContext, types.noWarnings);
         }
         @Override
         public Type apply(Type t) {
             if (!t.hasTag(DEFERRED)) {
                 return t.map(this);
             } else {
                 DeferredType dt = (DeferredType)t;
                 return typeOf(dt);
             }
         }
         protected Type typeOf(DeferredType dt) {
             switch (deferredAttrContext.mode) {
                 case CHECK:
                     return dt.tree.type == null ? Type.noType : dt.tree.type;
                 case SPECULATIVE:
                     return dt.speculativeType(deferredAttrContext.msym, deferredAttrContext.phase);
             }
             Assert.error();
             return null;
         }
     }
     /**
      * Specialized recovery deferred mapping.
      * Each deferred type D is mapped into a type T, where T is computed either by
      * (i) retrieving the type that has already been computed for D during a previous
      * attribution round (as before), or (ii) by synthesizing a new type R for D
      * (the latter step is useful in a recovery scenario).
      */
     public class RecoveryDeferredTypeMap extends DeferredTypeMap {
         public RecoveryDeferredTypeMap(AttrMode mode, Symbol msym, MethodResolutionPhase phase) {
             super(mode, msym, phase != null ? phase : MethodResolutionPhase.BOX);
         }
         @Override
         protected Type typeOf(DeferredType dt) {
             Type owntype = super.typeOf(dt);
             return owntype == Type.noType ?
                         recover(dt) : owntype;
         }
         /**
          * Synthesize a type for a deferred type that hasn't been previously
          * reduced to an ordinary type. Functional deferred types and conditionals
          * are mapped to themselves, in order to have a richer diagnostic
          * representation. Remaining deferred types are attributed using
          * a default expected type (j.l.Object).
          */
         private Type recover(DeferredType dt) {
             dt.check(attr.new RecoveryInfo(deferredAttrContext) {
                 @Override
                 protected Type check(DiagnosticPosition pos, Type found) {
                     return chk.checkNonVoid(pos, super.check(pos, found));
                 }
             });
             return super.apply(dt);
         }
     }
     /**
      * A special tree scanner that would only visit portions of a given tree.
      * The set of nodes visited by the scanner can be customized at construction-time.
      */
     abstract static class FilterScanner extends TreeScanner {
         final Filter<JCTree> treeFilter;
         FilterScanner(final Set<JCTree.Tag> validTags) {
             this.treeFilter = new Filter<JCTree>() {
                 public boolean accepts(JCTree t) {
                     return validTags.contains(t.getTag());
                 }
             };
         }
         @Override
         public void scan(JCTree tree) {
             if (tree != null) {
                 if (treeFilter.accepts(tree)) {
                     super.scan(tree);
                 } else {
                     skip(tree);
                 }
             }
         }
         /**
          * handler that is executed when a node has been discarded
          */
         void skip(JCTree tree) {}
     }
     /**
      * A tree scanner suitable for visiting the target-type dependent nodes of
      * a given argument expression.
      */
     static class PolyScanner extends FilterScanner {
         PolyScanner() {
             super(EnumSet.of(CONDEXPR, PARENS, LAMBDA, REFERENCE));
         }
     }
     /**
      * A tree scanner suitable for visiting the target-type dependent nodes nested
      * within a lambda expression body.
      */
     static class LambdaReturnScanner extends FilterScanner {
         LambdaReturnScanner() {
             super(EnumSet.of(BLOCK, CASE, CATCH, DOLOOP, FOREACHLOOP,
                     FORLOOP, RETURN, SYNCHRONIZED, SWITCH, TRY, WHILELOOP));
         }
     }
     /**
      * This visitor is used to check that structural expressions conform
      * to their target - this step is required as inference could end up
      * inferring types that make some of the nested expressions incompatible
      * with their corresponding instantiated target
      */
     class CheckStuckPolicy extends PolyScanner implements DeferredStuckPolicy, Infer.FreeTypeListener {
         Type pt;
         Infer.InferenceContext inferenceContext;
         Set<Type> stuckVars = new LinkedHashSet<Type>();
         Set<Type> depVars = new LinkedHashSet<Type>();
         @Override
         public boolean isStuck() {
             return !stuckVars.isEmpty();
         }
         @Override
         public Set<Type> stuckVars() {
             return stuckVars;
         }
         @Override
         public Set<Type> depVars() {
             return depVars;
         }
         public CheckStuckPolicy(ResultInfo resultInfo, DeferredType dt) {
             this.pt = resultInfo.pt;
             this.inferenceContext = resultInfo.checkContext.inferenceContext();
             scan(dt.tree);
             if (!stuckVars.isEmpty()) {
                 resultInfo.checkContext.inferenceContext()
                         .addFreeTypeListener(List.from(stuckVars), this);
             }
         }
         @Override
         public void typesInferred(InferenceContext inferenceContext) {
             stuckVars.clear();
         }
         @Override
         public void visitLambda(JCLambda tree) {
             if (inferenceContext.inferenceVars().contains(pt)) {
                 stuckVars.add(pt);
             }
             if (!types.isFunctionalInterface(pt)) {
                 return;
             }
             Type descType = types.findDescriptorType(pt);
             List<Type> freeArgVars = inferenceContext.freeVarsIn(descType.getParameterTypes());
             if (tree.paramKind == JCLambda.ParameterKind.IMPLICIT &&
                     freeArgVars.nonEmpty()) {
                 stuckVars.addAll(freeArgVars);
                 depVars.addAll(inferenceContext.freeVarsIn(descType.getReturnType()));
             }
             scanLambdaBody(tree, descType.getReturnType());
         }
         @Override
         public void visitReference(JCMemberReference tree) {
             scan(tree.expr);
             if (inferenceContext.inferenceVars().contains(pt)) {
                 stuckVars.add(pt);
                 return;
             }
             if (!types.isFunctionalInterface(pt)) {
                 return;
             }
             Type descType = types.findDescriptorType(pt);
             List<Type> freeArgVars = inferenceContext.freeVarsIn(descType.getParameterTypes());
             if (freeArgVars.nonEmpty() &&
                     tree.overloadKind == JCMemberReference.OverloadKind.OVERLOADED) {
                 stuckVars.addAll(freeArgVars);
                 depVars.addAll(inferenceContext.freeVarsIn(descType.getReturnType()));
             }
         }
         void scanLambdaBody(JCLambda lambda, final Type pt) {
             if (lambda.getBodyKind() == JCTree.JCLambda.BodyKind.EXPRESSION) {
                 Type prevPt = this.pt;
                 try {
                     this.pt = pt;
                     scan(lambda.body);
                 } finally {
                     this.pt = prevPt;
                 }
             } else {
                 LambdaReturnScanner lambdaScanner = new LambdaReturnScanner() {
                     @Override
                     public void visitReturn(JCReturn tree) {
                         if (tree.expr != null) {
                             Type prevPt = CheckStuckPolicy.this.pt;
                             try {
                                 CheckStuckPolicy.this.pt = pt;
                                 CheckStuckPolicy.this.scan(tree.expr);
                             } finally {
                                 CheckStuckPolicy.this.pt = prevPt;
                             }
                         }
                     }
                 };
                 lambdaScanner.scan(lambda.body);
             }
         }
     }
     /**
      * This visitor is used to check that structural expressions conform
      * to their target - this step is required as inference could end up
      * inferring types that make some of the nested expressions incompatible
      * with their corresponding instantiated target
      */
     class OverloadStuckPolicy extends CheckStuckPolicy implements DeferredStuckPolicy {
         boolean stuck;
         @Override
         public boolean isStuck() {
             return super.isStuck() || stuck;
         }
         public OverloadStuckPolicy(ResultInfo resultInfo, DeferredType dt) {
             super(resultInfo, dt);
         }
         @Override
         public void visitLambda(JCLambda tree) {
             super.visitLambda(tree);
             if (tree.paramKind == JCLambda.ParameterKind.IMPLICIT) {
                 stuck = true;
             }
         }
         @Override
         public void visitReference(JCMemberReference tree) {
             super.visitReference(tree);
             if (tree.overloadKind == JCMemberReference.OverloadKind.OVERLOADED) {
                 stuck = true;
             }
         }
     }
     /**
      * Does the argument expression {@code expr} need speculative type-checking?
      */
     boolean isDeferred(Env<AttrContext> env, JCExpression expr) {
         DeferredChecker dc = new DeferredChecker(env);
         dc.scan(expr);
         return dc.result.isPoly();
     }
     /**
      * The kind of an argument expression. This is used by the analysis that
      * determines as to whether speculative attribution is necessary.
      */
     enum ArgumentExpressionKind {
         /** kind that denotes poly argument expression */
         POLY,
         /** kind that denotes a standalone expression */
         NO_POLY,
         /** kind that denotes a primitive/boxed standalone expression */
         PRIMITIVE;
         /**
          * Does this kind denote a poly argument expression
          */
         public final boolean isPoly() {
             return this == POLY;
         }
         /**
          * Does this kind denote a primitive standalone expression
          */
         public final boolean isPrimitive() {
             return this == PRIMITIVE;
         }
         /**
          * Compute the kind of a standalone expression of a given type
          */
         static ArgumentExpressionKind standaloneKind(Type type, Types types) {
             return types.unboxedTypeOrType(type).isPrimitive() ?
                     ArgumentExpressionKind.PRIMITIVE :
                     ArgumentExpressionKind.NO_POLY;
         }
         /**
          * Compute the kind of a method argument expression given its symbol
          */
         static ArgumentExpressionKind methodKind(Symbol sym, Types types) {
             Type restype = sym.type.getReturnType();
             if (sym.type.hasTag(FORALL) &&
                     restype.containsAny(((ForAll)sym.type).tvars)) {
                 return ArgumentExpressionKind.POLY;
             } else {
                 return ArgumentExpressionKind.standaloneKind(restype, types);
             }
         }
     }
     /**
      * Tree scanner used for checking as to whether an argument expression
      * requires speculative attribution
      */
     final class DeferredChecker extends FilterScanner {
         Env<AttrContext> env;
         ArgumentExpressionKind result;
         public DeferredChecker(Env<AttrContext> env) {
             super(deferredCheckerTags);
             this.env = env;
         }
         @Override
         public void visitLambda(JCLambda tree) {
             //a lambda is always a poly expression
             result = ArgumentExpressionKind.POLY;
         }
         @Override
         public void visitReference(JCMemberReference tree) {
             //perform arity-based check
             Env<AttrContext> localEnv = env.dup(tree);
             JCExpression exprTree = (JCExpression)attribSpeculative(tree.getQualifierExpression(), localEnv,
                     attr.memberReferenceQualifierResult(tree));
             JCMemberReference mref2 = new TreeCopier<Void>(make).copy(tree);
             mref2.expr = exprTree;
             Symbol res =
                     rs.getMemberReference(tree, localEnv, mref2,
                         exprTree.type, tree.name);
             tree.sym = res;
             if (res.kind >= Kinds.ERRONEOUS ||
                     res.type.hasTag(FORALL) ||
                     (res.flags() & Flags.VARARGS) != 0 ||
                     (TreeInfo.isStaticSelector(exprTree, tree.name.table.names) &&
                     exprTree.type.isRaw())) {
                 tree.overloadKind = JCMemberReference.OverloadKind.OVERLOADED;
             } else {
                 tree.overloadKind = JCMemberReference.OverloadKind.UNOVERLOADED;
             }
             //a method reference is always a poly expression
             result = ArgumentExpressionKind.POLY;
         }
         @Override
         public void visitTypeCast(JCTypeCast tree) {
             //a cast is always a standalone expression
             result = ArgumentExpressionKind.NO_POLY;
         }
         @Override
         public void visitConditional(JCConditional tree) {
             scan(tree.truepart);
             if (!result.isPrimitive()) {
                 result = ArgumentExpressionKind.POLY;
                 return;
             }
             scan(tree.falsepart);
             result = reduce(ArgumentExpressionKind.PRIMITIVE);
         }
         @Override
         public void visitNewClass(JCNewClass tree) {
             result = (TreeInfo.isDiamond(tree) || attr.findDiamonds) ?
                     ArgumentExpressionKind.POLY : ArgumentExpressionKind.NO_POLY;
         }
         @Override
         public void visitApply(JCMethodInvocation tree) {
             Name name = TreeInfo.name(tree.meth);
             //fast path
             if (tree.typeargs.nonEmpty() ||
                     name == name.table.names._this ||
                     name == name.table.names._super) {
                 result = ArgumentExpressionKind.NO_POLY;
                 return;
             }
             //slow path
             final JCExpression rec = tree.meth.hasTag(SELECT) ?
                     ((JCFieldAccess)tree.meth).selected :
                     null;
             if (rec != null && !isSimpleReceiver(rec)) {
                 //give up if receiver is too complex (to cut down analysis time)
                 result = ArgumentExpressionKind.POLY;
                 return;
             }
             Type site = rec != null ?
                     attribSpeculative(rec, env, attr.unknownTypeExprInfo).type :
                     env.enclClass.sym.type;
             while (site.hasTag(TYPEVAR)) {
                 site = site.getUpperBound();
             }
             List<Type> args = rs.dummyArgs(tree.args.length());
             Resolve.LookupHelper lh = rs.new LookupHelper(name, site, args, List.<Type>nil(), MethodResolutionPhase.VARARITY) {
                 @Override
                 Symbol lookup(Env<AttrContext> env, MethodResolutionPhase phase) {
                     return rec == null ?
                         rs.findFun(env, name, argtypes, typeargtypes, phase.isBoxingRequired(), phase.isVarargsRequired()) :
                         rs.findMethod(env, site, name, argtypes, typeargtypes, phase.isBoxingRequired(), phase.isVarargsRequired(), false);
                 }
                 @Override
                 Symbol access(Env<AttrContext> env, DiagnosticPosition pos, Symbol location, Symbol sym) {
                     return sym;
                 }
             };
             Symbol sym = rs.lookupMethod(env, tree, site.tsym, rs.arityMethodCheck, lh);
             if (sym.kind == Kinds.AMBIGUOUS) {
                 Resolve.AmbiguityError err = (Resolve.AmbiguityError)sym.baseSymbol();
                 result = ArgumentExpressionKind.PRIMITIVE;
                 for (Symbol s : err.ambiguousSyms) {
                     if (result.isPoly()) break;
                     if (s.kind == Kinds.MTH) {
                         result = reduce(ArgumentExpressionKind.methodKind(s, types));
                     }
                 }
             } else {
                 result = (sym.kind == Kinds.MTH) ?
                     ArgumentExpressionKind.methodKind(sym, types) :
                     ArgumentExpressionKind.NO_POLY;
             }
         }
         //where
             private boolean isSimpleReceiver(JCTree rec) {
                 switch (rec.getTag()) {
                     case IDENT:
                         return true;
                     case SELECT:
                         return isSimpleReceiver(((JCFieldAccess)rec).selected);
                     case TYPEAPPLY:
                     case TYPEARRAY:
                         return true;
                     case ANNOTATED_TYPE:
                         return isSimpleReceiver(((JCAnnotatedType)rec).underlyingType);
                     default:
                         return false;
                 }
             }
             private ArgumentExpressionKind reduce(ArgumentExpressionKind kind) {
                 switch (result) {
                     case PRIMITIVE: return kind;
                     case NO_POLY: return kind.isPoly() ? kind : result;
                     case POLY: return result;
                     default:
                         Assert.error();
                         return null;
                 }
             }
         @Override
         public void visitLiteral(JCLiteral tree) {
             Type litType = attr.litType(tree.typetag);
             result = ArgumentExpressionKind.standaloneKind(litType, types);
         }
         @Override
         void skip(JCTree tree) {
             result = ArgumentExpressionKind.NO_POLY;
         }
     }
     //where
     private EnumSet<JCTree.Tag> deferredCheckerTags =
             EnumSet.of(LAMBDA, REFERENCE, PARENS, TYPECAST,
                     CONDEXPR, NEWCLASS, APPLY, LITERAL);
 }

Mercurial > jdk8-mips64-public > langtools / annotate

src/share/classes/com/sun/tools/javac/comp/DeferredAttr.java@acd64168cf8b (annotated)

src/share/classes/com/sun/tools/javac/comp/DeferredAttr.java