diff options
| author | mlang <mlang> | 2007-02-21 14:05:00 +0000 |
|---|---|---|
| committer | mlang <mwolson@gnu.org> | 2007-02-21 14:05:00 +0000 |
| commit | 0a2a9b02e30a9d9755102a07a41cac8bddccdab9 (patch) | |
| tree | f22332bbd4182f30f0a729cf5b0edc5e29db4d45 /later-do.el | |
| parent | c042491950f6b57ff1c14d6bfd9d4f01a72d5d4a (diff) | |
Speed up emms-play-directory-tree by about factor 10
Most of the speedup comes from using nconc in later-do instead
of append (and therefore, not excessively copying lists).
I see a factor of 10 speedup when generating the playlist
for 37000 audio files.
darcs-hash:20070221140553-08870-162cb94182e5e4947a0972a67b9229db8899e7cd.gz
Diffstat (limited to 'later-do.el')
| -rw-r--r-- | later-do.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/later-do.el b/later-do.el index 6c98da0..8c04c1d 100644 --- a/later-do.el +++ b/later-do.el @@ -52,7 +52,7 @@ time after this call, and definitely not while lisp is still executing. Code added using `later-do' is guaranteed to be executed in the sequence it was added." - (setq later-do-list (append later-do-list + (setq later-do-list (nconc later-do-list (list (cons function args)))) (unless later-do-timer (setq later-do-timer |