diff options
Diffstat (limited to 'PerformanceTests/SunSpider/tests/sunspider-0.9.1/access-nsieve.js')
-rw-r--r-- | PerformanceTests/SunSpider/tests/sunspider-0.9.1/access-nsieve.js | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/PerformanceTests/SunSpider/tests/sunspider-0.9.1/access-nsieve.js b/PerformanceTests/SunSpider/tests/sunspider-0.9.1/access-nsieve.js new file mode 100644 index 0000000..70fdf1a --- /dev/null +++ b/PerformanceTests/SunSpider/tests/sunspider-0.9.1/access-nsieve.js @@ -0,0 +1,38 @@ +// The Great Computer Language Shootout +// http://shootout.alioth.debian.org/ +// +// modified by Isaac Gouy + +function pad(number,width){ + var s = number.toString(); + var prefixWidth = width - s.length; + if (prefixWidth>0){ + for (var i=1; i<=prefixWidth; i++) s = " " + s; + } + return s; +} + +function nsieve(m, isPrime){ + var i, k, count; + + for (i=2; i<=m; i++) { isPrime[i] = true; } + count = 0; + + for (i=2; i<=m; i++){ + if (isPrime[i]) { + for (k=i+i; k<=m; k+=i) isPrime[k] = false; + count++; + } + } + return count; +} + +function sieve() { + for (var i = 1; i <= 3; i++ ) { + var m = (1<<i)*10000; + var flags = Array(m+1); + nsieve(m, flags); + } +} + +sieve(); |