1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/js/src/devtools/jint/sunspider/access-nsieve.js Wed Dec 31 06:09:35 2014 +0100 1.3 @@ -0,0 +1,48 @@ 1.4 +// The Great Computer Language Shootout 1.5 +// http://shootout.alioth.debian.org/ 1.6 +// 1.7 +// modified by Isaac Gouy 1.8 + 1.9 +function pad(number,width){ 1.10 + var s = number.toString(); 1.11 + var prefixWidth = width - s.length; 1.12 + if (prefixWidth>0){ 1.13 + /* BEGIN LOOP */ 1.14 + for (var i=1; i<=prefixWidth; i++) s = " " + s; 1.15 + /* END LOOP */ 1.16 + } 1.17 + return s; 1.18 +} 1.19 + 1.20 +function nsieve(m, isPrime){ 1.21 + var i, k, count; 1.22 + 1.23 + /* BEGIN LOOP */ 1.24 + for (i=2; i<=m; i++) { isPrime[i] = true; } 1.25 + /* END LOOP */ 1.26 + count = 0; 1.27 + 1.28 + /* BEGIN LOOP */ 1.29 + for (i=2; i<=m; i++){ 1.30 + if (isPrime[i]) { 1.31 + /* BEGIN LOOP */ 1.32 + for (k=i+i; k<=m; k+=i) isPrime[k] = false; 1.33 + /* END LOOP */ 1.34 + count++; 1.35 + } 1.36 + } 1.37 + /* END LOOP */ 1.38 + return count; 1.39 +} 1.40 + 1.41 +function sieve() { 1.42 + /* BEGIN LOOP */ 1.43 + for (var i = 1; i <= 3; i++ ) { 1.44 + var m = (1<<i)*10000; 1.45 + var flags = Array(m+1); 1.46 + nsieve(m, flags); 1.47 + } 1.48 + /* END LOOP */ 1.49 +} 1.50 + 1.51 +sieve();