On Fri, 2009-09-11 at 03:42 -0700, Derick Eddington wrote: > On Thu, 2009-09-10 at 22:53 -0700, Derick Eddington wrote: > > Darn, my stack-lang implementation sucks: > > > > [...] > > > > As you can see, the same algorithm took mine 7.2 seconds and took Factor > > only 0.6 second. > > > > I'm not sure why mine is so slow. I suspect it's because my data stack > > is an SRFI-39 parameter and it is used heavily. I'm going to change my > > implementation to pass and return the data stack through "word" > > procedure calls, to see if that helps. > > I did that and it brought the time down to 3.3 seconds
I've brought the time down further to 2.6 seconds, by using "unsafe" pair accessors, where safe, for the heavily-used car'ing and cdr'ing of the list data stack. Currently, only Ikarus uses "unsafe" car and cdr, and other systems default to the standard ones. If someone knows how to get bindings for "unsafe" ones from other systems, I can add .IMPL.sls files for them. -- : Derick ----------------------------------------------------------------
