Byte Sieve
The Byte Sieve is a computer-based implementation of the Sieve of Eratosthenes published by Byte as a programming language performance benchmark. It first appeared in the September 1981 edition of the magazine and was revisited on occasion. Although intended to compare the performance of different languages on the same computers, it quickly became a widely used machine benchmark.
The Sieve was one of the more popular benchmarks of the home computer era, another being the Creative Computing Benchmark of 1983, and the Rugg/Feldman benchmarks, mostly seen in the UK in this era. Byte later published the more thorough NBench in 1995 to replace it.
History
Origins
Jim Gilbreath of the Naval Ocean System Center had been considering the concept of writing a small language benchmarking program for some time, desiring one that would be portable across languages, small enough that the program code would fit on a single printed page, and did not rely on specific features like hardware multiplication or division. The solution was inspired by a meeting with Chuck Forsberg at the January 1980 USENIX meeting in Boulder, CO, where Forsberg mentioned an implementation of the sieve written by Donald Knuth.[1][2]
Gilbreath felt the sieve would be an ideal benchmark as it avoided indirect tests on arithmetic performance, which varied widely between systems. The algorithm mostly stresses array lookup performance and basic logic and branching capabilities. Nor does it require any advanced language features like recursion or advanced collection types. The only modification from Knuth’s original version was to remove a multiplication by two and replace it with an addition instead. Machines with hardware multipliers would otherwise run so much faster that the rest of the performance would be hidden.[1]
After six months of effort porting it to as many platforms as he had access to, the first results were introduced in the September 1981 edition of Byte in an article entitled "A High-Level Language Benchmark".[1] Gilbreath was quick to point out that:
“ | I should emphasize that this benchmark is not the only criterion by which to judge a language or compiler.[1] | ” |
The article provided reference implementations in ten languages, including more popular selections like BASIC, C, Pascal, COBOL, and FORTRAN, and some less well-known examples like Forth, ZSPL, Ratfor, PL/1 and PLMX.[3]
Example runs were provided for a variety of machines, mostly Zilog Z80 or MOS 6502-based. The best time was initially 16.5 seconds, turned in by Ratfor on a 4 MHz Z80 machine, but Gary Kildall personally provided a version in Digital Research's prototype version of PL/1[4] that ran in 14 seconds and set the mark for this first collection. The slowest was Microsoft COBOL on the same machine, which took a whopping 5115 seconds (almost one and a half hours), longer even than interpreted languages like BASIC.[5] A notable feature of this first run was that C, Pascal and PL/1 all turned in a roughly similar performance that easily beat the various interpreters.[4]
A second set of tests was carried out on more powerful machines, with Motorola 68000 assembly language turning in the fastest times at 1.12 seconds, slightly besting C on a PDP-11/70 and almost twice as fast as 8086 assembler. Most PDP-11 and HP-3000 times were much slower, on the order of 10 to 50 seconds.[6] Tests on these machines using only high-level languages was led by NBS Pascal on the PDP-11, at 2.6 seconds.[7]
UCSD Pascal provided another interesting set of results as the same program can be run on multiple machines. Running on the dedicated Ithaca InterSystems Pascal-100 machine, a Pascal MicroEngine based computer, it ran in 54 seconds, while on the Z80 it was 239, and 516 on the Apple II.[7]
Spread
Gilbreath, this time along with his brother Gary, revisited the code in the January 1983 edition of Byte. This version removed most of the less popular languages, leaving Pascal, C, FORTRAN IV, and COBOL, while adding Ada and Modula-2. Thanks to readers providing additional samples, the number of machines, operating systems and languages compared in the resulting tables was greatly expanded.[8]
Motorola 68000 (68k) assembly remained the fastest, almost three times the speed of the Intel 8086 running at the same 8 MHz clock. Using high-level languages the two were closer in performance, with the 8086 generally better than half the speed of the 68k and often much closer.[9] A wider variety of minicomputers and mainframes was also included, with times that the 68k generally beat except for the very fastest machines like the IBM 3033 and high-end models of the VAX. Older machines like the Data General Nova, PDP-11 and HP-1000 were nowhere near as fast as the 68k.[8]
Gilbreath's second article appeared as the benchmark was becoming quite common as a way to compare the performance of various machines, let alone languages. In spite of his original warning not to do so, it soon began appearing in magazine advertisements as a way to compare performance against the competition,[10][11] and as a general benchmark.[12]
Byte once again revisited the sieve later in August 1983 as part of a whole-magazine series of articles on the C language. In this case the use was more in keeping with the original intent, using a single source code and running it on a single machine to compare the performance of C compilers on the CP/M-86 operating system,[13] on CP/M-80,[14] and for the IBM PC.[15]
In spite of Gilbreath's concern in the original article, by this time the code had become almost universal for testing, and one of the articles remarked that "The Sieve of Eratosthenes is a mandatory benchmark".[13] It was included in the Byte UNIX Benchmark Suite introduced in August 1984.[16]
Today
New versions of the code continue to appear for new languages,[17] eg Rosetta Code and GitHub has many versions available.[18] It is often used as an example of functional programming in spite of the common version not actually using the sieve algorithm.[19]
Implementation
The provided implementation calculated odd primes only, so the 8191 element array actually represented primes less than 16385. As shown in a sidebar table, the 0th element represented 3, 1st element 5, 2nd element 7, and so on.
This is the original BASIC version of the code presented in 1981.[20][lower-alpha 1] The dialect is not specified, but a number of details mean it does not run under early versions of Microsoft BASIC (4.x and earlier), among these the use of long variable names like SIZE
and FLAGS
. The lack of line numbers may suggest a minicomputer variety that reads source from a text file, but may have also been a printing error.
REM Eratosthenes Sieve Prime Number Program in BASIC 1 SIZE = 8190 2 DIM FLAGS(8191) 3 PRINT "Only 1 iteration" 5 COUNT = 0 6 FOR I = 0 TO SIZE 7 FLAGS (I) = 1 8 NEXT I 9 FOR I = 0 TO SIZE 10 IF FLAGS (I) = 0 THEN 18 11 PRIME = I+I + 3 12 K = I + PRIME 13 IF K > SIZE THEN 17 14 FLAGS (K) = 0 15 K = K + PRIME 16 GOTO 13 17 COUNT = COUNT + 1 18 NEXT I 19 PRINT COUNT," PRIMES"
And in C, with some whitespace adjustments from the original:[21]
#define true 1 #define false 0 #define size 8190 #define sizepl 8191 char flags[sizepl]; main() { int i, prime, k, count, iter; printf("10 iterations\n"); for (iter = 1; iter <= 10; iter ++) { count=0 ; for (i = 0; i <= size; i++) flags[i] = true; for (i = 0; i <= size; i++) { if (flags[i]) { prime = i + i + 3; k = i + prime; while (k <= size) { flags[k] = false; k += prime; } count = count + 1; } } } printf("\n%d primes", count); }
Notes
- ↑ Note that the line number for the first line is missing in the original source listing.
References
Citations
- ↑ 1.0 1.1 1.2 1.3 Gilbreath 1981, p. 180.
- ↑ Knuth 1969, pp. 416, 658.
- ↑ Gilbreath 1981, pp. 181-190.
- ↑ 4.0 4.1 Gilbreath 1981, pp. 194.
- ↑ Gilbreath 1981, pp. 195.
- ↑ Gilbreath 1981, pp. 193.
- ↑ 7.0 7.1 Gilbreath 1981, pp. 196.
- ↑ 8.0 8.1 Gilbreath & Gilbreath 1983, p. 294.
- ↑ Gilbreath & Gilbreath 1983, p. 292.
- ↑ "HS/FORTH (advertisement)". PC Tech Journal: 132. October 1985. https://s3-us-west-2.amazonaws.com/archive.pcjs.org/pubs/pc/magazines/pctj/PCTJ-1985-05/pages/PCTJ-1985-05%20134.pdf.
- ↑ "FORTH is now very.fast (advertisement)". FORTH Dimensions: 2. November–December 1985. http://www.forth.org/fd/FD-V07N4.pdf.
- ↑ Ciarcia, Steve (1979). Ciarcia's Circuit Cellar, Volume 6. Circuit Cellar. p. 133. ISBN 9780070109681. https://books.google.com/books?id=DKajtHfqoRkC&pg=PA133.
- ↑ 13.0 13.1 Houston, Jerry; Brodrick, Jim; Kent, Les (August 1983). "Comparing C Compilers for CP/M-86". Byte: 82–106. https://archive.org/details/byte-magazine-1983-08/page/n83.
- ↑ Kern, Christopher (August 1983). "Five C Compilers for CP/M-80". Byte: 110–130. https://archive.org/details/byte-magazine-1983-08/page/n111.
- ↑ Phraner, Ralph (August 1983). "Nine C Compilers for the IBM PC". Byte: 134–168. https://archive.org/details/byte-magazine-1983-08/page/n135.
- ↑ Hinnant, David (August 1984). "Benchmarking UNIX Systems: UNIX performance on microcomputers and minicomputers". Byte: 132–135, 400–409. https://archive.org/details/byte-magazine-1984-08/page/n137.
- ↑ "Swift Sieve of Eratosthenes". 27 July 2015. http://kelan.io/2015/swfit-sieve-of-eratosthenes/.
- ↑ "Sieve of Eratosthenes". https://github.com/search?q=Sieve+of+Eratosthenes.
- ↑ O'Neill, Melissa (January 2009). "The Genuine Sieve of Eratosthenes". Journal of Functional Programming 19 (1): 95–106. doi:10.1017/S0956796808007004.
- ↑ Gilbreath 1981, p. 188.
- ↑ Gilbreath 1981, p. 186.
Bibliography
- Gilbreath, Jim (September 1981). "A High-Level Language Benchmark". Byte: 180–198. https://archive.org/details/byte-magazine-1981-09/page/n181.
- Gilbreath, Jim; Gilbreath, Gary (January 1983). "Eratosthenes Revisited: Once More through the Sieve". Byte: 283–325. https://archive.org/details/byte-magazine-1983-01/page/n291.
- Knuth, Donald (1969). The Art of Computer Programming Volume 2: Seminumerical Algorithms. Addison-Wesley. ISBN 978-0-201-89684-8. https://books.google.com/books?id=_NHDswEACAAJ.
Original source: https://en.wikipedia.org/wiki/Byte Sieve.
Read more |