closure calls (just the invocation part).

frog/leg/ssa/builder.dart

 // Copyright (c) 2011, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 class Interceptors {
   Compiler compiler;
   Interceptors(Compiler this.compiler);
 
   SourceString mapOperatorToMethodName(Operator op) {
     String name = op.source.stringValue;
@@ skipping 802 matching lines @@
         visit(send.receiver);
         receiver = pop();
       }
       add(new HInvokeDynamicSetter(null, jsSetterName, receiver, value));
       stack.add(value);
     } else {
       stack.add(updateDefinition(send, value));
     }
   }
 
+  visitOperatorSend(node) {

[ngeoffray, 2012/01/05 14:05:46]

node -> Send node

+    assert(node.selector is Operator);
+    Operator op = node.selector;
+    if (const SourceString("[]") == op.source) {
+      HStatic target = new HStatic(interceptors.getIndexInterceptor());
+      add(target);
+      visit(node.receiver);
+      HInstruction receiver = pop();
+      visit(node.argumentsNode);
+      HInstruction index = pop();
+      push(new HIndex(target, receiver, index));
+    } else if (const SourceString("&&") == op.source ||
+               const SourceString("||") == op.source) {
+      visitLogicalAndOr(node, op);
+    } else if (const SourceString("!") == op.source) {
+      visitLogicalNot(node);
+    } else if (node.argumentsNode is Prefix) {
+      visitUnary(node, op);
+    } else {
+      visit(node.receiver);
+      visit(node.argumentsNode);
+      var right = pop();
+      var left = pop();
+      visitBinary(left, op, right);
+    }    
+  }
+
+  addVisitedSendArgumentsToList(Link<Node> link, List<HInstruction> list) {
+    for (; !link.isEmpty(); link = link.tail) {
+      visit(link.head);
+      list.add(pop());
+    }    
+  }
+
+  visitDynamicSend(Send node) {
+    var inputs = <HInstruction>[];
+
+    SourceString dartMethodName = node.selector.asIdentifier().source;
+
+    Element interceptor =
+        interceptors.getStaticInterceptor(dartMethodName, node.argumentCount());
+    if (interceptor != null) {
+      HStatic target = new HStatic(interceptor);
+      add(target);
+      inputs.add(target);
+      visit(node.receiver);
+      inputs.add(pop());
+      addVisitedSendArgumentsToList(node.arguments, inputs);
+      push(new HInvokeInterceptor(dartMethodName.stringValue, false, inputs));
+      return;
+    }
+
+    if (node.receiver === null) {
+      HThis receiver = new HThis();
+      add(receiver);
+      inputs.add(receiver);
+    } else {
+      visit(node.receiver);
+      inputs.add(pop());
+    }
+
+    addVisitedSendArgumentsToList(node.arguments, inputs);
+
+    String jsMethodName = compiler.namer.instanceName(dartMethodName);
+    // The first entry in the inputs list is the receiver.
+    push(new HInvokeDynamicMethod(jsMethodName, inputs));
+  }
+
+  visitClosureSend(Send node) {
+    Element element = elements[node];
+    HInstruction closureTarget;
+    if (element === null) {
+      visit(node.selector);
+      closureTarget = pop();            
+    } else {
+      assert(element.kind === ElementKind.VARIABLE ||
+             element.kind === ElementKind.PARAMETER);
+      closureTarget = definitions[element];
+      assert(closureTarget !== null);
+    }
+    var inputs = <HInstruction>[];    
+    inputs.add(closureTarget);
+    addVisitedSendArgumentsToList(node.arguments, inputs);
+    String jsMethodName = compiler.namer.closureInvocationName();
+    push(new HInvokeDynamicMethod(jsMethodName, inputs));
+  }
+
+  visitForeignSend(Send node) {
+    Link<Node> link = node.arguments;
+    // If the invoke is on foreign code, don't visit the first
+    // argument, which is the type, and the second argument,
+    // which is the foreign code.
+    link = link.tail.tail;
+    var inputs = <HInstruction>[];
+    addVisitedSendArgumentsToList(link, inputs);
+    LiteralString type = node.arguments.head;
+    LiteralString literal = node.arguments.tail.head;
+    compiler.ensure(literal is LiteralString);
+    compiler.ensure(type is LiteralString);
+    compiler.ensure(literal.value.stringValue[0] == '@');
+    push(new HForeign(unquote(literal, 1), unquote(type, 0), inputs));
+  }
+
+  visitStaticSend(Send node) {
+    Element element = elements[node];
+    HStatic target = new HStatic(element);
+    add(target);
+    var inputs = <HInstruction>[];
+    inputs.add(target);
+    addVisitedSendArgumentsToList(node.arguments, inputs);
+    push(new HInvokeStatic(inputs));
+  }
+
   visitSend(Send node) {
     if (node.selector is Operator) {
-      Operator op = node.selector;
-      if (const SourceString("[]") == op.source) {
-        HStatic target = new HStatic(interceptors.getIndexInterceptor());
-        add(target);
-        visit(node.receiver);
-        HInstruction receiver = pop();
-        visit(node.argumentsNode);
-        HInstruction index = pop();
-        push(new HIndex(target, receiver, index));
-      } else if (const SourceString("&&") == op.source ||
-                 const SourceString("||") == op.source) {
-        visitLogicalAndOr(node, op);
-      } else if (const SourceString("!") == op.source) {
-        visitLogicalNot(node);
-      } else if (node.argumentsNode is Prefix) {
-        visitUnary(node, op);
-      } else {
-        visit(node.receiver);
-        visit(node.argumentsNode);
-        var right = pop();
-        var left = pop();
-        visitBinary(left, op, right);
-      }
+      visitOperatorSend(node);
     } else if (node.isPropertyAccess) {
       generateGetter(node, elements[node]);
+    /*} else if (Elements.isClosureSend(node, elements)) {

[kasperl, 2012/01/05 12:52:19]

Hmm. What's your plan here?

[floitsch, 2012/01/05 13:59:20]

oops :)
done.

+      assert(node.receiver === null);
+      visitClosureSend(node); */
     } else {
+      var isClosure = Elements.isClosureSend(node, elements);
       Element element = elements[node];
-      bool isInvokeDynamic = (element === null) || element.isInstanceMember();
-      bool isForeign =
-          (element !== null) && (element.kind === ElementKind.FOREIGN);
-      bool isStatic = !isInvokeDynamic && !isForeign;
-
-      Link<Node> link = node.arguments;
-      var inputs = <HInstruction>[];
-
-      SourceString dartMethodName;
-      Element interceptor;
-      if (isInvokeDynamic) {
-        dartMethodName = node.selector.asIdentifier().source;
-        interceptor = interceptors.getStaticInterceptor(
-            dartMethodName, node.argumentCount());
-        if (interceptor != null) {
-          HStatic target = new HStatic(interceptor);
-          add(target);
-          inputs.add(target);
-          visit(node.receiver);
-          inputs.add(pop());
-          isInvokeDynamic = false;
-        } else if (node.receiver === null) {
-          HThis receiver = new HThis();
-          add(receiver);
-          inputs.add(receiver);
+      if (element === null) {
+        if (node.selector.asIdentifier() === null) {
+          // Example: (foo())(), or (f)().
+          assert(node.receiver === null);
+          if (!isClosure) print(1);

[kasperl, 2012/01/05 12:52:19]

Debug printing.

[floitsch, 2012/01/05 13:59:20]

Done.

+          visitClosureSend(node);
         } else {
-          visit(node.receiver);
-          inputs.add(pop());
+          // Example: f() with 'f' unbound.
+          // This can only happen inside an instance method.
+          if (isClosure) print(2);

[kasperl, 2012/01/05 12:52:19]

Debug printing.

[floitsch, 2012/01/05 13:59:20]

Done.

+          visitDynamicSend(node);
         }
-      } else if (isForeign) {
-        // If the invoke is on foreign code, don't visit the first
-        // argument, which is the type, and the second argument,
-        // which is the foreign code.
-        link = link.tail.tail;
+      } else if (element.isInstanceMember()) {
+        // Example: f() with 'f' bound to instance method.
+        if (isClosure) print(3);
+        visitDynamicSend(node);
+      } else if (element.kind === ElementKind.FOREIGN) {
+        if (isClosure) print(4);
+        visitForeignSend(node);
+      } else if (element.kind === ElementKind.VARIABLE ||
+                 element.kind === ElementKind.PARAMETER) {
+        // Example: f() with 'f' a local variable or parameter.
+        assert(node.receiver === null);
+        if (!isClosure) print(4);
+        visitClosureSend(node);
       } else {
-        HStatic target = new HStatic(element);
-        add(target);
-        inputs.add(target);
-      }
-
-      for (; !link.isEmpty(); link = link.tail) {
-        visit(link.head);
-        inputs.add(pop());
-      }
-
-      if (isInvokeDynamic) {
-        String jsMethodName = compiler.namer.instanceName(dartMethodName);
-        // The first entry in the inputs list is the receiver.
-        push(new HInvokeDynamicMethod(jsMethodName, inputs));
-      } else if (isForeign) {
-        LiteralString type = node.arguments.head;
-        LiteralString literal = node.arguments.tail.head;
-        compiler.ensure(literal is LiteralString);
-        compiler.ensure(type is LiteralString);
-        compiler.ensure(literal.value.stringValue[0] == '@');
-        push(new HForeign(unquote(literal, 1), unquote(type, 0), inputs));
-      } else if (interceptor != null) {
-        push(new HInvokeInterceptor(dartMethodName.stringValue, false, inputs));
-      } else {
-        assert(isStatic);
-        push(new HInvokeStatic(inputs));
+        // Example: A.f() or f() with 'f' bound to a static function.
+        // Also includes new A() or new A.named() which is treated like a
+        // static call to a factory.
+        assert(!element.isInstanceMember());
+        if (isClosure) {
+          print(node.receiver);
+          print(node.selector is TypeAnnotation);
+          print(node.selector.asStatement() === null);
+          print(node.selector.asSend() === null);
+          print(node.selector.asIdentifier() === null);
+          print(node.receiver === null);
+          print(element.kind === ElementKind.VARIABLE);
+          print(element.kind === ElementKind.PARAMETER);
+        }
+        visitStaticSend(node);
       }
     }
   }
 
   visitNewExpression(NewExpression node) => visitSend(node.send);
 
   HInstruction updateDefinition(Node node, HInstruction value) {
     VariableElement element = elements[node];
     value = guard(element.type, value);
     definitions[element] = value;
@@ skipping 256 matching lines @@
   }
 
   visitCatchBlock(CatchBlock node) {
     compiler.unimplemented('SsaBuilder.visitCatchBlock', node: node);
   }
 
   visitTypedef(Typedef node) {
     compiler.unimplemented('SsaBuilder.visitTypedef', node: node);
   }
 }