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,,,
>
