Patch for unofficial Version 1.3a of benchmark.m

[Matthias Roessler]

This is my private version 1.3a of benchmark.m. I added some results
(hope I done it right) and added the patch by Rick Niles.


--------------------- cut here 
----------------------------------------------------
*** benchmark-1.3.m     Thu Mar 28 10:17:17 1996
--- benchmark.m Thu Mar 28 10:20:15 1996
***************
*** 1,5 ****
! bm_version = ["bm ", "1.3"];
! 
  # Benchmark for octave.
  # Francesco Potorti` <address@hidden>
  # Fri Mar 22 16:37:46 MET 1996
--- 1,7 ----
! bm_version = ["bm ", "1.3a"];
! # incorporated patch by Rick Niles <address@hidden>
! # and added some results. Matthias Roessler <address@hidden>
! #
  # Benchmark for octave.
  # Francesco Potorti` <address@hidden>
  # Fri Mar 22 16:37:46 MET 1996
*************** printf ("Octave benchmark version %s\n",
*** 9,14 ****
--- 11,24 ----
  # To add reference times for your machine run the benchmark and
  # add the values contained in the bm_mytime vector.
  #
+ # Reference times by Matthias Roessler <address@hidden>
+ # Used binary distributed octave-1.1.1 (no cputime())
+ bm_refname = "Sun Ultra 1";
+ bm_reftime = [8.57  9.39   7.04   6.30  8.27];
+ bm_refname = "HP 9000/735/99";
+ bm_reftime = [6.09  9.55   2.85   5.18  2.80];
+ bm_refname = "SGI Indigo 2 XL";
+ bm_reftime = [4.22  3.25   4.40   2.70  4.91];
  # Reference times by Francesco Potorti` <address@hidden>
  bm_refname = "DEC Alpha 2100";
  bm_reftime = [0.440  1.31  1.46  0.610  1.04];
*************** for f = 1:length(bm_reftime)
*** 90,96 ****
    bm_test(f,1);                               # increase the RSS, load things
    [name,time] = bm_test(f,1);         # evaluate name and time
    printf("%-33s", name);              # print name
!   rep = round(bm_runtime/time);               # no. of repetitions per run
    for runs = 1:bm_maxseconds/bm_runtime       # do runs
      [name,time] = bm_test(f,rep);     # run
      res(runs) = bm_reftime(f) / time; # store relative performance
--- 100,106 ----
    bm_test(f,1);                               # increase the RSS, load things
    [name,time] = bm_test(f,1);         # evaluate name and time
    printf("%-33s", name);              # print name
!   rep = max(1,round(bm_runtime/time));  # no. of repetitions per run
    for runs = 1:bm_maxseconds/bm_runtime       # do runs
      [name,time] = bm_test(f,rep);     # run
      res(runs) = bm_reftime(f) / time; # store relative performance
--------------------- cut here 
----------------------------------------------------

------------------------------------------------------------------------------
Dipl.-Inf. Matthias Roessler                            Phone: 49 9131 85 8027
IMMD IV,  Universitaet Erlangen-Nuernberg               Fax1:  49 9131 85 8732
Martensstrasse 1; D-91058 Erlangen                      Fax2:  49 9131 39 388 
                                     address@hidden
                             http://www4.informatik.uni-erlangen.de/~roessler/
------------------------------------------------------------------------------
"Es geht auch anders, aber so geht es auch!"                                  
"You can do this differently, but you can also do it like this!" (Lotti Huber)