Re: [Sbcl-devel] Performance

[Christophe R. <cs...@ca...>]

On Wed, Jan 16, 2002 at 03:18:12PM -0600, William Harold Newman wrote:
> On Wed, Jan 16, 2002 at 04:30:40PM +0000, Christophe Rhodes wrote:
> > Attached is the report generated by Eric Marsden's performance
> > benchmarking code, referenced at
> > <URL:http://ww.telent.net/cliki/Performance%20Benchmarks>. 
>
> I've actually never tried these or any other comprehensive benchmarks,
> or even looked at them. So actually, it's remarkable that things
> haven't gotten much worse than they are. I did spend some serious time
> optimizing the adjustable array code that were tanking performance in
> my application, but I've paid very little attention to general
> performance, and I thought it would show more.

It turns out that we may not have been measuring what we thought we
were measuring with these benchmarks in any case; I need to rerun them
under slightly more controlled conditions. I'll post the results when
I have them, but for now, I wouldn't worry at all.

Christophe

[ technical note: the code initially was:

(eval-when (:compile-toplevel)
  (locally (declare (optimize ...))) ; oops one too many brackets
  (dolist (file (directory "files/*.lisp"))
    (compile-file file)))

So. Changing it to:

(eval-when (:compile-toplevel)
  (locally (declare (optimize ...))
    (dolist (file (directory "files/*.lisp"))
      (compile-file file))))

Makes it better, but it's not at all obvious that this is a compliant
way of making the compile-file compile with the specified optimization
settings.

Better is probably:

(eval-when (:compile-toplevel)
  (proclaim '(optimize ...))
  (dolist (file (directory "files/*.lisp"))
    (compile-file file)))
]
-- 
Jesus College, Cambridge, CB5 8BL                           +44 1223 510 299
http://www-jcsu.jesus.cam.ac.uk/~csr21/                  (defun pling-dollar 
(str schar arg) (first (last +))) (make-dispatch-macro-character #\! t)
(set-dispatch-macro-character #\! #\$ #'pling-dollar)