The Tor Browser / file diff

     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/js/src/tests/js1_7/extensions/regress-363040-01.js	Wed Dec 31 06:09:35 2014 +0100
     1.3 @@ -0,0 +1,65 @@
     1.4 +/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
     1.5 +/* This Source Code Form is subject to the terms of the Mozilla Public
     1.6 + * License, v. 2.0. If a copy of the MPL was not distributed with this
     1.7 + * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
     1.8 +
     1.9 +//-----------------------------------------------------------------------------
    1.10 +var BUGNUMBER = 363040;
    1.11 +var summary = 'Array.prototype.reduce application in continued fraction';
    1.12 +var actual = '';
    1.13 +var expect = '';
    1.14 +
    1.15 +
    1.16 +//-----------------------------------------------------------------------------
    1.17 +test();
    1.18 +//-----------------------------------------------------------------------------
    1.19 +
    1.20 +function test()
    1.21 +{
    1.22 +  enterFunc ('test');
    1.23 +  printBugNumber(BUGNUMBER);
    1.24 +  printStatus (summary);
    1.25 + 
    1.26 +// Print x as a continued fraction in compact abbreviated notation and return
    1.27 +// the convergent [n, d] such that x - (n / d) <= epsilon.
    1.28 +  function contfrac(x, epsilon) {
    1.29 +    let i = Math.floor(x);
    1.30 +    let a = [i];
    1.31 +    x = x - i;
    1.32 +    let maxerr = x;
    1.33 +    while (maxerr > epsilon) {
    1.34 +      x = 1 / x;
    1.35 +      i = Math.floor(x);
    1.36 +      a.push(i);
    1.37 +      x = x - i;
    1.38 +      maxerr = x * maxerr / i;
    1.39 +    }
    1.40 +    print(uneval(a));
    1.41 +    a.push([1, 0]);
    1.42 +    a.reverse();
    1.43 +    return a.reduce(function (x, y) {return [x[0] * y + x[1], x[0]];});
    1.44 +  }
    1.45 +
    1.46 +  if (!Array.prototype.reduce)
    1.47 +  {
    1.48 +    print('Test skipped. Array.prototype.reduce not implemented');
    1.49 +  }
    1.50 +  else
    1.51 +  {
    1.52 +// Show contfrac in action.
    1.53 +    for each (num in [Math.PI, Math.sqrt(2), 1 / (Math.sqrt(Math.E) - 1)]) {
    1.54 +      print('Continued fractions for', num);
    1.55 +      for each (eps in [1e-2, 1e-3, 1e-5, 1e-7, 1e-10]) {
    1.56 +        let frac = contfrac(num, eps);
    1.57 +        let est = frac[0] / frac[1];
    1.58 +        let err = num - est;
    1.59 +        print(uneval(frac), est, err);
    1.60 +      }
    1.61 +      print();
    1.62 +    }
    1.63 +  }
    1.64 +
    1.65 +  reportCompare(expect, actual, summary);
    1.66 +
    1.67 +  exitFunc ('test');
    1.68 +}