Is there a non gl/glut related benchmark for expansion/compilation I should try to see whether it's a problem with those libraries or I just have a slow 64-bit machine? (It's Athlon 2800+ with 1GB RAM.)
On Wed, Apr 22, 2009 at 12:01 PM, Ramana Kumar <[email protected]> wrote: > Here are the stats on my 32-bit dual core machine with a different > video card. It still takes 8 seconds - is that too slow? If so, I must > be doing something wrong, because the hardware is reasonably different > - all the similarities are in my setup. > ram...@archbox ~ % ikarus > Ikarus Scheme version 0.0.4-rc1+ (revision 1747, build 2009-04-22) > Copyright (c) 2006-2008 Abdulaziz Ghuloum > >> (time (eval '(list glutInit glBegin) (environment '(rnrs) '(gl) '(glut)))) > running stats for (eval '(list glutInit glBegin) (environment '(rnrs) > '(gl) '(glut))): > 28 collections > 8192 ms elapsed cpu time, including 652 ms collecting > 8201 ms elapsed real time, including 655 ms collecting > 116736320 bytes allocated > (#<procedure glutInit> #<procedure glBegin>) > > On Mon, Apr 20, 2009 at 7:23 PM, Ramana Kumar <[email protected]> wrote: >> ram...@amy ~ % ikarus >> Ikarus Scheme version 0.0.4-rc1+, 64-bit (revision 1747, build 2009-04-20) >> Copyright (c) 2006-2008 Abdulaziz Ghuloum >> >>> (time (eval '(list glutInit glBegin) (environment '(rnrs) '(gl) '(glut)))) >> running stats for (eval '(list glutInit glBegin) (environment '(rnrs) >> '(gl) '(glut))): >> 31 collections >> 66495 ms elapsed cpu time, including 992 ms collecting >> 73964 ms elapsed real time, including 1086 ms collecting >> 268332576 bytes allocated >> (#<procedure glutInit> #<procedure glBegin>) >> >> >> On Mon, Apr 20, 2009 at 7:18 PM, Abdulaziz Ghuloum <[email protected]> >> wrote: >>> >>> On Apr 20, 2009, at 10:37 AM, Ramana Kumar wrote: >>> >>>> actually, I would say it is instantaneous once glut and gl are >>>> precompiled. >>> >>> Can you delete the ikarus-fasl files, try the following and report the >>> results: >>> >>> $ ikarus >>> Ikarus Scheme version 0.0.4-rc1+ (revision 1768, build 2009-04-18) >>> Copyright (c) 2006-2009 Abdulaziz Ghuloum >>> >>>> (time (eval '(list glutInit glBegin) (environment '(rnrs) '(gl) '(glut)))) >>> running stats for (eval '(list glutInit glBegin) (environment '(rnrs) '(gl) >>> '(glut))): >>> 30 collections >>> 3650 ms elapsed cpu time, including 338 ms collecting >>> 3653 ms elapsed real time, including 338 ms collecting >>> 124823880 bytes allocated >>> (#<procedure glutInit> #<procedure glBegin>) >>> >>> Aziz,,, >>> >> >
