js/src/jit-test/tests/sunspider/check-math-cordic.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.

michael@0 1 /*
michael@0 2 * Copyright (C) Rich Moore. All rights reserved.
michael@0 3 *
michael@0 4 * Redistribution and use in source and binary forms, with or without
michael@0 5 * modification, are permitted provided that the following conditions
michael@0 6 * are met:
michael@0 7 * 1. Redistributions of source code must retain the above copyright
michael@0 8 * notice, this list of conditions and the following disclaimer.
michael@0 9 * 2. Redistributions in binary form must reproduce the above copyright
michael@0 10 * notice, this list of conditions and the following disclaimer in the
michael@0 11 * documentation and/or other materials provided with the distribution.
michael@0 12 *
michael@0 13 * THIS SOFTWARE IS PROVIDED BY CONTRIBUTORS ``AS IS'' AND ANY
michael@0 14 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
michael@0 15 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
michael@0 16 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL APPLE COMPUTER, INC. OR
michael@0 17 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
michael@0 18 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
michael@0 19 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
michael@0 20 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
michael@0 21 * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
michael@0 22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
michael@0 23 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
michael@0 24 */
michael@0 25
michael@0 26 /////. Start CORDIC
michael@0 27
michael@0 28 var AG_CONST = 0.6072529350;
michael@0 29
michael@0 30 function FIXED(X)
michael@0 31 {
michael@0 32 return X * 65536.0;
michael@0 33 }
michael@0 34
michael@0 35 function FLOAT(X)
michael@0 36 {
michael@0 37 return X / 65536.0;
michael@0 38 }
michael@0 39
michael@0 40 function DEG2RAD(X)
michael@0 41 {
michael@0 42 return 0.017453 * (X);
michael@0 43 }
michael@0 44
michael@0 45 var Angles = [
michael@0 46 FIXED(45.0), FIXED(26.565), FIXED(14.0362), FIXED(7.12502),
michael@0 47 FIXED(3.57633), FIXED(1.78991), FIXED(0.895174), FIXED(0.447614),
michael@0 48 FIXED(0.223811), FIXED(0.111906), FIXED(0.055953),
michael@0 49 FIXED(0.027977)
michael@0 50 ];
michael@0 51
michael@0 52
michael@0 53 function cordicsincos() {
michael@0 54 var X;
michael@0 55 var Y;
michael@0 56 var TargetAngle;
michael@0 57 var CurrAngle;
michael@0 58 var Step;
michael@0 59
michael@0 60 X = FIXED(AG_CONST); /* AG_CONST * cos(0) */
michael@0 61 Y = 0; /* AG_CONST * sin(0) */
michael@0 62
michael@0 63 TargetAngle = FIXED(28.027);
michael@0 64 CurrAngle = 0;
michael@0 65 for (Step = 0; Step < 12; Step++) {
michael@0 66 var NewX;
michael@0 67 if (TargetAngle > CurrAngle) {
michael@0 68 NewX = X - (Y >> Step);
michael@0 69 Y = (X >> Step) + Y;
michael@0 70 X = NewX;
michael@0 71 CurrAngle += Angles[Step];
michael@0 72 } else {
michael@0 73 NewX = X + (Y >> Step);
michael@0 74 Y = -(X >> Step) + Y;
michael@0 75 X = NewX;
michael@0 76 CurrAngle -= Angles[Step];
michael@0 77 }
michael@0 78 }
michael@0 79 return CurrAngle;
michael@0 80 }
michael@0 81
michael@0 82 ///// End CORDIC
michael@0 83
michael@0 84 function cordic( runs ) {
michael@0 85 var actual;
michael@0 86
michael@0 87 for ( var i = 0 ; i < runs ; i++ ) {
michael@0 88 actual = cordicsincos();
michael@0 89 }
michael@0 90
michael@0 91 assertEq(actual, 1834995.3515519998)
michael@0 92 }
michael@0 93
michael@0 94 cordic(25000);

mercurial