chicken-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Chicken-users] [ANN] fannkuch chicken benchmark!


From: Marijn Schouten (hkBst)
Subject: Re: [Chicken-users] [ANN] fannkuch chicken benchmark!
Date: Wed, 05 Mar 2008 14:01:42 +0100
User-agent: Thunderbird 2.0.0.12 (X11/20080228)

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

On my amd64 C2D GNU/Linux system with chicken-3.0.0 and gcc-4.2.3  I ran the 
following
bash script:


#!/bin/bash

#compile and run fannkuch programs

csc -Ob fannkuch_chicken.scm -o fannkuch_chicken
csc -Ob fannkuch_orig.scm -o fannkuch_orig
gcc -O2 fannkuch.c -o fannkuch

echo "Old Scheme: "
time ./fannkuch_orig 11

echo "New Scheme: "
time ./fannkuch_chicken 11

echo "C: "
time ./fannkuch 11


to produce


Old Scheme:
1234567891011
2134567891011
2314567891011
3214567891011
3124567891011
1324567891011
2341567891011
3241567891011
3421567891011
4321567891011
4231567891011
2431567891011
3412567891011
4312567891011
4132567891011
1432567891011
1342567891011
3142567891011
4123567891011
1423567891011
1243567891011
2143567891011
2413567891011
4213567891011
2345167891011
3245167891011
3425167891011
4325167891011
4235167891011
2435167891011
Pfannkuchen(11) = 51

real    0m35.453s
user    0m34.218s
sys     0m0.082s
New Scheme:
1234567891011
2134567891011
2314567891011
3214567891011
3124567891011
1324567891011
1342567891011
3142567891011
3412567891011
4312567891011
4132567891011
1432567891011
2431567891011
4231567891011
4321567891011
3421567891011
3241567891011
2341567891011
2143567891011
1243567891011
1423567891011
4123567891011
4213567891011
2413567891011
2415367891011
4215367891011
4125367891011
1425367891011
1245367891011
2145367891011
2154367891011
Pfannkuchen(11) = 51

real    0m13.603s
user    0m13.166s
sys     0m0.106s
C:
1234567891011
2134567891011
2314567891011
3214567891011
3124567891011
1324567891011
2341567891011
3241567891011
3421567891011
4321567891011
4231567891011
2431567891011
3412567891011
4312567891011
4132567891011
1432567891011
1342567891011
3142567891011
4123567891011
1423567891011
1243567891011
2143567891011
2413567891011
4213567891011
2345167891011
3245167891011
3425167891011
4325167891011
4235167891011
2435167891011
Pfannkuchen(11) = 51

real    0m4.949s
user    0m4.796s
sys     0m0.014s

HTH,

Marijn

- --
Marijn Schouten (hkBst), Gentoo Lisp project, Gentoo ML
<http://www.gentoo.org/proj/en/lisp/>, #gentoo-{lisp,ml} on FreeNode
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v2.0.7 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFHzpm2p/VmCx0OL2wRAg1+AJ9rJ4NykSDUimkdFlTMAykqsZftcgCeLxdP
ycTcwITIDefV6qyLU814kUc=
=mNXk
-----END PGP SIGNATURE-----




reply via email to

[Prev in Thread] Current Thread [Next in Thread]