FYI Implementing 'super' keyword

test/mjsunit/harmony/toMethod.js

Index: test/mjsunit/harmony/toMethod.js
diff --git a/test/mjsunit/never-optimize.js b/test/mjsunit/harmony/toMethod.js
similarity index 75%
copy from test/mjsunit/never-optimize.js
copy to test/mjsunit/harmony/toMethod.js
index 643588ebf41e84c5d42bef8829d9ceb1e756841c..ec8703d960477dfc8885de65bd6cfec1b8d4c4ee 100644
--- a/test/mjsunit/never-optimize.js
+++ b/test/mjsunit/harmony/toMethod.js
@@ -24,40 +24,39 @@
 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
+//
 // Flags: --allow-natives-syntax
 
-function o1() {
-}
 
-if (%GetOptimizationStatus(o1) != 4) {
-  // 4 == optimization disabled.
-  o1(); o1();
-  %OptimizeFunctionOnNextCall(o1);
-  o1();
+(function () {
+  function f(x) {
+    var a = [0, 1, 2]
+    return a[x];
+  }
+
+  function ClassD() { }
 
-  // Check that the given function was optimized.
-  assertOptimized(o1);
+  assertEquals(1, f(1));
+  var g = %ToMethod(f, ClassD);
+  assertEquals(1, g(1));
+}());
 
-  // Test the %NeverOptimizeFunction runtime call.
-  %NeverOptimizeFunction(u1);
-  function u1() {
-  }
 
-  function u2() {
-    u1();
+(function () {
+  function f(x) {
+    return function g(y)  { x++; return x + y; };
   }
 
-  u1(); u1();
-  u2(); u2();
-
-  %OptimizeFunctionOnNextCall(u1);
-  %OptimizeFunctionOnNextCall(u2);
+  function Base() {}
+  function Derived() { }
+  Derived.prototype = Object.create(Base.prototype);
 
-  u1(); u1();
-  u2(); u2();
 
-  // 2 => not optimized.
-  assertUnoptimized(u1);
-  assertOptimized(u2);
-}
+  var q = f(0);
+  assertEquals(2, q(1));
+  assertEquals(3, q(1));
+  var g = %ToMethod(q, Derived);
+  assertFalse(g === q);
+  assertEquals(4, g(1));
+  assertEquals(5, q(1));
+}());