63 lines
1.8 KiB
Scheme
63 lines
1.8 KiB
Scheme
; Gabriel benchmarks
|
|
(define boyer-iters 2)
|
|
(define browse-iters 60)
|
|
(define cpstak-iters 100)
|
|
(define ctak-iters 10)
|
|
(define dderiv-iters 200000)
|
|
(define deriv-iters 200000)
|
|
(define destruc-iters 50)
|
|
(define diviter-iters 100000)
|
|
(define divrec-iters 100000)
|
|
(define puzzle-iters 10)
|
|
(define tak-iters 200)
|
|
(define takl-iters 30)
|
|
(define trav1-iters 10)
|
|
(define trav2-iters 2)
|
|
(define triangl-iters 1)
|
|
|
|
; Kernighan and Van Wyk benchmarks
|
|
(define ack-iters 1)
|
|
(define array1-iters 1)
|
|
(define cat-iters 1)
|
|
(define string-iters 1)
|
|
(define sum1-iters 1)
|
|
(define sumloop-iters 1)
|
|
(define tail-iters 1)
|
|
(define wc-iters 1)
|
|
|
|
; C benchmarks
|
|
(define fft-iters 2000)
|
|
(define fib-iters 5)
|
|
(define fibfp-iters 2)
|
|
(define mbrot-iters 100)
|
|
(define nucleic-iters 5)
|
|
(define pnpoly-iters 100000)
|
|
(define sum-iters 10000)
|
|
(define sumfp-iters 5000)
|
|
(define tfib-iters 20)
|
|
|
|
; Other benchmarks
|
|
(define conform-iters 4)
|
|
(define dynamic-iters 2)
|
|
(define earley-iters 20)
|
|
(define fibc-iters 50)
|
|
(define graphs-iters 30)
|
|
(define lattice-iters 1)
|
|
(define matrix-iters 40)
|
|
(define maze-iters 400)
|
|
(define mazefun-iters 100)
|
|
(define nqueens-iters 200)
|
|
(define paraffins-iters 100)
|
|
(define peval-iters 20)
|
|
(define pi-iters 1)
|
|
(define primes-iters 10000)
|
|
(define ray-iters 1)
|
|
(define scheme-iters 2000)
|
|
(define simplex-iters 10000)
|
|
(define slatex-iters 2)
|
|
(define perm9-iters 1)
|
|
(define nboyer-iters 10)
|
|
(define sboyer-iters 10)
|
|
(define gcbench-iters 1)
|
|
(define compiler-iters 30)
|