Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-04-04 Thread Andreas Rottmann
Andy Wingo writes: > On Wed 30 Mar 2011 12:58, Andreas Rottmann writes: > >> "unzip" times the unzipping of a not-so-large (675KiB) ZIP file using >> Göran Weinholts ZIP implementation. > > How long does the standard unix utility take, for the record? > On a tmpfs, with the same ZIP file: unzip

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-04-04 Thread Andy Wingo
On Tue 05 Apr 2011 00:00, Andreas Rottmann writes: > Andy Wingo writes: > >> How long does the standard unix utility take, for the record? >> > On a tmpfs, with the same ZIP file: > > unzip ~/public_html/tmp/bundles/xitomatl-20110103.zip 0.07s user 0.03s > system 77% cpu 0.135 total OK, so Gu

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-04-04 Thread Andy Wingo
On Wed 30 Mar 2011 12:58, Andreas Rottmann writes: > "unzip" times the unzipping of a not-so-large (675KiB) ZIP file using > Göran Weinholts ZIP implementation. How long does the standard unix utility take, for the record? Andy -- http://wingolog.org/

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-30 Thread Andreas Rottmann
[ Sorry for the incomplete mail I just sent; hit the wrong key combo ] Andy Wingo writes: > On Wed 23 Mar 2011 00:20, Andreas Rottmann writes: > >> In porting dorodango[0], I have noticed that Guile's R6RS fixnum >> operations are quite slow; here's a patch to remedy that a bit. > > What is th

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-30 Thread Andreas Rottmann
Andy Wingo writes: > On Wed 23 Mar 2011 00:20, Andreas Rottmann writes: > >> In porting dorodango[0], I have noticed that Guile's R6RS fixnum >> operations are quite slow; here's a patch to remedy that a bit. > > What is the state of things here? I'm a bit lost in the discussion :) > > You said

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-29 Thread Andreas Rottmann
Andy Wingo writes: > On Wed 23 Mar 2011 00:20, Andreas Rottmann writes: > >> In porting dorodango[0], I have noticed that Guile's R6RS fixnum >> operations are quite slow; here's a patch to remedy that a bit. > > What is the state of things here? I'm a bit lost in the discussion :) > I'll post

Re: Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-29 Thread Andy Wingo
On Wed 23 Mar 2011 00:20, Andreas Rottmann writes: > In porting dorodango[0], I have noticed that Guile's R6RS fixnum > operations are quite slow; here's a patch to remedy that a bit. What is the state of things here? I'm a bit lost in the discussion :) You said that decompressing the zip file

Re: [PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-27 Thread Andreas Rottmann
l...@gnu.org (Ludovic Courtès) writes: > Hello, > > Andreas Rottmann writes: > >> So, that's around 5% improvment (on the ZIP benchmark) for an IMHO >> significantly more hackish implementation. I'm not sure that's worth >> it. WDYT? > > Was it with ‘fixnum?’ inline, or with the ‘fixnum?’ instru

Re: [PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-27 Thread Ludovic Courtès
Hello, Andreas Rottmann writes: > So, that's around 5% improvment (on the ZIP benchmark) for an IMHO > significantly more hackish implementation. I'm not sure that's worth > it. WDYT? Was it with ‘fixnum?’ inline, or with the ‘fixnum?’ instruction? It’s ironic that while R6RS fixnums are a pe

Re: [PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-25 Thread Andreas Rottmann
Andreas Rottmann writes: > l...@gnu.org (Ludovic Courtès) writes: > >> Hi Andreas, >> >> I’m all for your suggestion. >> >> Andreas Rottmann writes: >> >>> + (define-syntax define-fxop* >>> +(syntax-rules () >>> + ((_ name op) >>> + (define name >>> +(case-lambda >>> + (

Re: [PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-24 Thread Andreas Rottmann
l...@gnu.org (Ludovic Courtès) writes: > Hi Andreas, > > I’m all for your suggestion. > > Andreas Rottmann writes: > >> + (define-syntax define-fxop* >> +(syntax-rules () >> + ((_ name op) >> + (define name >> + (case-lambda >> + ((x y) >> +(assert-fixnum x y) >>

Re: [PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-24 Thread Ludovic Courtès
Hi Andreas, I’m all for your suggestion. Andreas Rottmann writes: > + (define-syntax define-fxop* > +(syntax-rules () > + ((_ name op) > + (define name > + (case-lambda > +((x y) > + (assert-fixnum x y) > + (op x y)) > +(args > + (ass

[PATCH] Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-22 Thread Andreas Rottmann
* module/rnrs/arithmetic/fixnums.scm (assert-fixnum): Is now a macro. (assert-fixnums): New procedure checking a the elements of a list for fixnum-ness. All callers applying `assert-fixnum' to a list now changed to use this procedure. * module/rnrs/arithmetic/fixnums.scm (define-fxop*): N

Take some lowhanging fruit to speed up R6RS fixnum operations

2011-03-22 Thread Andreas Rottmann
In porting dorodango[0], I have noticed that Guile's R6RS fixnum operations are quite slow; here's a patch to remedy that a bit. The patch contains a benchmark for `fxxor', which experiences a performance improvement of >2 with the patch. [0] http://home.gna.org/dorodango/ I also used real code