* updated benchmarks/README since quicksort now works.
This commit is contained in:
parent
b27bb61802
commit
0287c37a00
|
@ -81,6 +81,7 @@ setup ()
|
||||||
CHICKEN_INIT="/Users/ikarus/.opt/bin/csi"
|
CHICKEN_INIT="/Users/ikarus/.opt/bin/csi"
|
||||||
GSI="/Users/ikarus/.opt/4.0b20/bin/gsi"
|
GSI="/Users/ikarus/.opt/4.0b20/bin/gsi"
|
||||||
GSC="/Users/ikarus/.opt/4.0b20/bin/gsc"
|
GSC="/Users/ikarus/.opt/4.0b20/bin/gsc"
|
||||||
|
MIT="mit-scheme"
|
||||||
;;
|
;;
|
||||||
esac
|
esac
|
||||||
|
|
||||||
|
|
|
@ -66,5 +66,6 @@
|
||||||
(define gcold-iters 10000)
|
(define gcold-iters 10000)
|
||||||
;(define nbody-iters 1) ; nondeterministic (order of evaluation)
|
;(define nbody-iters 1) ; nondeterministic (order of evaluation)
|
||||||
|
|
||||||
|
(define quicksort-iters 100)
|
||||||
(define fpsum-iters 10)
|
(define fpsum-iters 10)
|
||||||
|
|
||||||
|
|
|
@ -8458,3 +8458,59 @@ Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified
|
||||||
|
|
||||||
|
|
||||||
> bench DIED!
|
> bench DIED!
|
||||||
|
|
||||||
|
****************************
|
||||||
|
Benchmarking Larceny-r6rs on Sun Nov 4 23:27:58 EST 2007 under Darwin Vesuvius.local 8.10.1 Darwin Kernel Version 8.10.1: Wed May 23 16:33:00 PDT 2007; root:xnu-792.22.5~1/RELEASE_I386 i386 i386
|
||||||
|
|
||||||
|
Testing quicksort under Larceny-r6rs
|
||||||
|
Compiling...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
>
|
||||||
|
>
|
||||||
|
Running...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
> bench DIED!
|
||||||
|
|
||||||
|
****************************
|
||||||
|
Benchmarking Larceny-r6rs on Sun Nov 4 23:33:16 EST 2007 under Darwin Vesuvius.local 8.10.1 Darwin Kernel Version 8.10.1: Wed May 23 16:33:00 PDT 2007; root:xnu-792.22.5~1/RELEASE_I386 i386 i386
|
||||||
|
|
||||||
|
Testing quicksort under Larceny-r6rs
|
||||||
|
Compiling...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
>
|
||||||
|
>
|
||||||
|
Running...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
>
|
||||||
|
Words allocated: 84219692
|
||||||
|
Words reclaimed: 0
|
||||||
|
Elapsed time...: 124748 ms (User: 73859 ms; System: 50830 ms)
|
||||||
|
Elapsed GC time: 183 ms (CPU: 180 in 320 collections.)
|
||||||
|
|
||||||
|
****************************
|
||||||
|
Benchmarking Larceny-r6rs on Mon Nov 5 01:11:44 EST 2007 under Darwin Vesuvius.local 8.10.1 Darwin Kernel Version 8.10.1: Wed May 23 16:33:00 PDT 2007; root:xnu-792.22.5~1/RELEASE_I386 i386 i386
|
||||||
|
|
||||||
|
Testing scheme under Larceny-r6rs
|
||||||
|
Compiling...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
>
|
||||||
|
>
|
||||||
|
Running...
|
||||||
|
Larceny v0.93 "Deviated Prevert" (Nov 10 2006 04:27:45, precise:BSD Unix:unified)
|
||||||
|
|
||||||
|
|
||||||
|
>
|
||||||
|
Words allocated: 29621942
|
||||||
|
Words reclaimed: 0
|
||||||
|
Elapsed time...: 1199 ms (User: 1195 ms; System: 4 ms)
|
||||||
|
Elapsed GC time: 44 ms (CPU: 48 in 113 collections.)
|
||||||
|
|
|
@ -82,7 +82,6 @@
|
||||||
(run-benchmark
|
(run-benchmark
|
||||||
"quicksort30"
|
"quicksort30"
|
||||||
quicksort-iters
|
quicksort-iters
|
||||||
quicksort-benchmark
|
|
||||||
(lambda (v)
|
(lambda (v)
|
||||||
(call-with-current-continuation
|
(call-with-current-continuation
|
||||||
(lambda (return)
|
(lambda (return)
|
||||||
|
@ -91,4 +90,5 @@
|
||||||
#t)
|
#t)
|
||||||
(if (not (<= (vector-ref v (- i 1))
|
(if (not (<= (vector-ref v (- i 1))
|
||||||
(vector-ref v i)))
|
(vector-ref v i)))
|
||||||
(return #f))))))))
|
(return #f))))))
|
||||||
|
(lambda () quicksort-benchmark)))
|
||||||
|
|
|
@ -40,6 +40,6 @@ output is modeled after Chez Scheme's in order to facilitate
|
||||||
interoperability with tools that parse benchmark data.
|
interoperability with tools that parse benchmark data.
|
||||||
|
|
||||||
BUGS:
|
BUGS:
|
||||||
maze, nbody, and quicksort do not work yet.
|
maze and nbody do not work yet because they require make-polar.
|
||||||
|
|
||||||
Aziz,,,
|
Aziz,,,
|
||||||
|
|
|
@ -174,7 +174,7 @@
|
||||||
(define parsing-iters 1000)
|
(define parsing-iters 1000)
|
||||||
(define gcold-iters 10000)
|
(define gcold-iters 10000)
|
||||||
|
|
||||||
(define quicksort-iters 1)
|
(define quicksort-iters 100)
|
||||||
(define fpsum-iters 10)
|
(define fpsum-iters 10)
|
||||||
(define nbody-iters 1) ; nondeterministic (order of evaluation)
|
(define nbody-iters 1) ; nondeterministic (order of evaluation)
|
||||||
)
|
)
|
||||||
|
|
Loading…
Reference in New Issue