Implement more super calls.

lib/kernel_visitor.dart

 // Copyright (c) 2016, 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.md file.
 
 library rasta.kernel_visitor;
 
 import 'package:kernel/ast.dart' as ir;
 
 import 'package:kernel/accessors.dart' show
     Accessor,
@@ skipping 2326 matching lines @@
 
   @override
   ir.Expression visitStringFromEnvironmentConstructorInvoke(
       NewExpression node,
       StringFromEnvironmentConstantExpression constant,
       _) {
     return buildConstConstructorInvoke(node);
   }
 
   @override
-  ir.Throw visitSuperBinary(
+  ir.SuperMethodInvocation visitSuperBinary(
       Send node,
       FunctionElement function,
       BinaryOperator operator,
       Node argument,
       _) {
-    return buildUnsupported(node, "SuperBinary");
+    return new ir.SuperMethodInvocation(
+        kernel.functionToIr(function),
+        new ir.Arguments(<ir.Expression>[argument.accept(this)]));
   }
 
   @override
-  ir.Throw visitSuperCompoundIndexSet(
+  ir.Expression visitSuperCompoundIndexSet(
       SendSet node,
       MethodElement getter,
       MethodElement setter,
       Node index,
       AssignmentOperator operator,
       Node rhs,
       _) {
-    return buildUnsupported(node, "SuperCompoundIndexSet");
+    return
+        buildSuperIndexAccessor(index, getter, setter).buildCompoundAssignment(
+            kernel.irName(operator.selectorName, currentElement),
+            rhs.accept(this));
   }
 
   @override
   ir.Initializer visitSuperConstructorInvoke(
       Send node,
       ConstructorElement superConstructor,
       InterfaceType type,
       NodeList arguments,
       CallStructure callStructure,
       _) {
@@ skipping 127 matching lines @@
         !getter.isConst) {
       setter = getter;
     }
     return new SuperPropertyAccessor(
         (getter == null) ? null : kernel.elementToIr(getter),
         (setter == null) ? null : kernel.elementToIr(setter));
   }
 
   Accessor buildSuperIndexAccessor(
       Expression index,
-      Element read,
-      [Element write]) {
+      Element getter,
+      [Element setter]) {
+    if (setter == null && getter.isField && !getter.isFinal &&
+        !getter.isConst) {
+      setter = getter;
+    }
     return new SuperIndexAccessor(
         index.accept(this),
-        kernel.elementToIr(read),
-        (write == null) ? null : kernel.elementToIr(write));
+        (getter == null) ? null : kernel.elementToIr(getter),
+        (setter == null) ? null : kernel.elementToIr(setter));
   }
 
   @override
   ir.SuperPropertyGet visitSuperGetterGet(
       Send node,
       FunctionElement getter,
       _) {
     return buildSuperPropertyAccessor(getter).buildSimpleRead();
   }
 
@@ skipping 522 matching lines @@
       : this(null, true, node, initializers);
 
   accept(ir.Visitor v) => throw "unsupported";
 
   visitChildren(ir.Visitor v) => throw "unsupported";
 
   String toString() {
     return "IrFunction($kind, $isConstructor, $node, $initializers)";
   }
 }