* Added some benchmarking data in benchmarks/BUGS
This commit is contained in:
parent
3acdcb6c04
commit
d4facf79d3
|
@ -6422,3 +6422,83 @@ Words allocated: 551809361
|
|||
Words reclaimed: 0
|
||||
Elapsed time...: 2272 ms (User: 2241 ms; System: 20 ms)
|
||||
Elapsed GC time: 763 ms (CPU: 755 in 2105 collections.)
|
||||
|
||||
****************************
|
||||
Benchmarking Larceny-r6rs on Fri Jun 15 08:56:37 AST 2007 under Darwin Vesuvius.local 8.9.1 Darwin Kernel Version 8.9.1: Thu Feb 22 20:55:00 PST 2007; root:xnu-792.18.15~1/RELEASE_I386 i386 i386
|
||||
|
||||
Testing fibfp 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: 358610884
|
||||
Words reclaimed: 0
|
||||
Elapsed time...: 3328 ms (User: 3260 ms; System: 47 ms)
|
||||
Elapsed GC time: 502 ms (CPU: 501 in 1368 collections.)
|
||||
|
||||
****************************
|
||||
Benchmarking Larceny-r6rs on Fri Jun 15 08:56:48 AST 2007 under Darwin Vesuvius.local 8.9.1 Darwin Kernel Version 8.9.1: Thu Feb 22 20:55:00 PST 2007; root:xnu-792.18.15~1/RELEASE_I386 i386 i386
|
||||
|
||||
Testing mbrot 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: 551809361
|
||||
Words reclaimed: 0
|
||||
Elapsed time...: 2287 ms (User: 2245 ms; System: 23 ms)
|
||||
Elapsed GC time: 785 ms (CPU: 759 in 2105 collections.)
|
||||
|
||||
****************************
|
||||
Benchmarking Larceny-r6rs on Fri Jun 15 08:56:59 AST 2007 under Darwin Vesuvius.local 8.9.1 Darwin Kernel Version 8.9.1: Thu Feb 22 20:55:00 PST 2007; root:xnu-792.18.15~1/RELEASE_I386 i386 i386
|
||||
|
||||
Testing pnpoly 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: 72351714
|
||||
Words reclaimed: 0
|
||||
Elapsed time...: 1510 ms (User: 1494 ms; System: 7 ms)
|
||||
Elapsed GC time: 94 ms (CPU: 110 in 276 collections.)
|
||||
|
||||
****************************
|
||||
Benchmarking Larceny-r6rs on Fri Jun 15 08:57:09 AST 2007 under Darwin Vesuvius.local 8.9.1 Darwin Kernel Version 8.9.1: Thu Feb 22 20:55:00 PST 2007; root:xnu-792.18.15~1/RELEASE_I386 i386 i386
|
||||
|
||||
Testing sumfp 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: 400031744
|
||||
Words reclaimed: 0
|
||||
Elapsed time...: 1828 ms (User: 1805 ms; System: 11 ms)
|
||||
Elapsed GC time: 547 ms (CPU: 544 in 1526 collections.)
|
||||
|
|
|
@ -40,3 +40,25 @@ BEFORE:
|
|||
30995 ms elapsed real time
|
||||
1600160040 bytes allocated
|
||||
|
||||
AFTER $fl+, $fl-, $fl*, $fl/:
|
||||
running stats for fibfp:
|
||||
343 collections
|
||||
2659 ms elapsed cpu time
|
||||
2677 ms elapsed real time
|
||||
1433318472 bytes allocated
|
||||
running stats for mbrot:
|
||||
530 collections
|
||||
2002 ms elapsed cpu time
|
||||
2030 ms elapsed real time
|
||||
2215766392 bytes allocated
|
||||
running stats for pnpoly:
|
||||
81 collections
|
||||
2127 ms elapsed cpu time
|
||||
2144 ms elapsed real time
|
||||
335204784 bytes allocated
|
||||
running stats for sumfp:
|
||||
382 collections
|
||||
1856 ms elapsed cpu time
|
||||
1890 ms elapsed real time
|
||||
1600164776 bytes allocated
|
||||
|
||||
|
|
|
@ -7,8 +7,8 @@
|
|||
(define (run n)
|
||||
(let loop ((i n) (sum 0.))
|
||||
(if (fl<? i 0.)
|
||||
sum
|
||||
(loop (fl- i 1.) (fl+ i sum)))))
|
||||
sum
|
||||
(loop (fl- i 1.) (fl+ i sum)))))
|
||||
|
||||
(define (main . args)
|
||||
(run-benchmark
|
||||
|
|
Loading…
Reference in New Issue