Re: instructions per second benchmark (in parrot ;)

[Sam Tregar]

On Thu, 20 Sep 2001, Dan Sugalski wrote:

> FWIW, my 600MHz Alpha clocks in at around 23M ops/sec. Nyah! ;-P

My PIII 700Mhz gets 23M.  Well, ok, to get above 21M I had to make a
slight alteration (below).  Damn Alphas and their "superior technology".

-sam

RCS file: /home/perlcvs/parrot/interpreter.c,v
retrieving revision 1.18
diff -u -r1.18 interpreter.c
--- interpreter.c       2001/09/19 20:05:06     1.18
+++ interpreter.c       2001/09/20 23:36:24
@@ -50,11 +50,8 @@
        time through */
     opcode_t *(*func)();
     void **temp;
-    opcode_t *code_start;

-    code_start = code;
-
-    while (code >= code_start && code < (code_start + code_size) &&
*code) {
+    while (*code) {
         DO_OP(code, temp, func, interpreter);
     }