js/src/jit-test/tests/sunspider/check-controlflow-recursive.js@6474c204b198
js/src/jit-test/tests/sunspider/check-controlflow-recursive.js
Wed, 31 Dec 2014 06:09:35 +0100
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Wed, 31 Dec 2014 06:09:35 +0100
- changeset 0
- 6474c204b198
- permissions
- -rw-r--r--
Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.
1 // The Computer Language Shootout
2 // http://shootout.alioth.debian.org/
3 // contributed by Isaac Gouy
5 function ack(m,n){
6 if (m==0) { return n+1; }
7 if (n==0) { return ack(m-1,1); }
8 return ack(m-1, ack(m,n-1) );
9 }
11 function fib(n) {
12 if (n < 2){ return 1; }
13 return fib(n-2) + fib(n-1);
14 }
16 function tak(x,y,z) {
17 if (y >= x) return z;
18 return tak(tak(x-1,y,z), tak(y-1,z,x), tak(z-1,x,y));
19 }
21 var ret = 0;
22 for ( var i = 3; i <= 5; i++ ) {
23 ret += ack(3,i);
24 ret += fib(17.0+i);
25 ret += tak(3*i+3,2*i+2,i+1);
26 }
27 assertEq(ret, 57775);
