Question regarding Sbcl



Oliver Kullmann wrote:
>> On my box (Intel E5300 2.6Ghz), testsuite real times (in seconds)
>> and failed tests are
>>
>> sbcl-1.0.50     204  rtest16 (386, 387)
>> gcl-2.6.8_pre   208
>> cmucl-20b_p001  211
>> clozurecl-1.7   293  rtest_gamma (673)
>> ecl-11.1.1      404  rtest8 (126, 127)
>> clisp-2.49      628
>>
>> If the testsuite is representative, ecl is 2 times slower than sbcl.
>>
>> Andrey
>
> In our setting (with our mix of applications, typically list- and
set-processing)
> I get for the comparison of Ecl (11.1.1) and Sbcl (1.0.53):
>
>  - Sbcl needs roughly 50% more time with loading files (especially for our
>    tests that's not so nice, since every test runs on its own and loads a
>    lot of files).
>  - Sbcl is around 30% faster (sometimes more, sometimes less, but seems to
>    be around that).
>
> So for our applications the advantage is not so great.
>
> Oliver


Here is an extreme example, i think there must be an error somewhere but
anyways, on this example (extracted from batch("grobner.demo") ) i see
a huge speed advantage for sbcl (some years ago, cmucl was faster than
sbcl on this example). The example is interesting since it is a pure big
symbolic computation. I would expect clisp to take ages on this one.
I have checked i don't have precompiled grobner.fasl
or the like. Of course both are on the same machine:


niobe% rlwrap bin/maxima
Maxima 5.25.1 http://maxima.sourceforge.net
using Lisp CMU Common Lisp 20a (20A Unicode)
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) load(grobner);

Loading maxima-grobner $Revision: 1.6 $ $Date: 2009-06-02 07:49:49 $
(%o1)
/home/michel/pub/maxima-5.25.1/share/maxima/5.25.1/share/contrib/Grobner\
/grobner.lisp
(%i2) showtime:all;
(%i3) ev(poly_grobner([- 1 + z^3  + y^4  + x^5 , - 1 + z^2  + y^3  + x^3 ],
[x, y, z]), poly_coefficient_ring = 'ring_of_integers);
Evaluation took 85.8400 seconds (85.8600 elapsed) using 1337.651 MB.
        3    4    5       2    3    3       3    2  2    4    2  3    2
(%o3) [z  + y  + x  - 1, z  + y  + x  - 1, z  - x  z  + y  - x  y  + x  - 1,
  ..........


niobe% rlwrap bin/maxima -l sbcl
Maxima 5.25.1 http://maxima.sourceforge.net
using Lisp SBCL 1.0.43
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) load(grobner);
Loading maxima-grobner $Revision: 1.6 $ $Date: 2009-06-02 07:49:49 $
(%o1)       share/maxima/5.25.1/share/contrib/Grobner/grobner.lisp
(%i2) showtime:all;
Evaluation took 0.0000 seconds (0.0000 elapsed) using 0 bytes.
(%o2)                                 all
(%i3)  ev(poly_grobner([- 1 + z^3  + y^4  + x^5 , - 1 + z^2  + y^3  + x^3 ],
[x, y, z]), poly_coefficient_ring = 'ring_of_integers);
Evaluation took 1.1320 seconds (1.4790 elapsed) using 88.820 MB.
         3    4    5       2    3    3       3    2  2    4    2  3    2
(%o3) [z  + y  + x  - 1, z  + y  + x  - 1, z  - x  z  + y  - x  y  + x  - 1,
  ......








-- 
Michel Talon