Commit 8931e361 authored by Juergen Nickelsen's avatar Juergen Nickelsen
Browse files

Merge branch 'master' of git:lis.pl

parents 213419ae ab56cba4
Loading
Loading
Loading
Loading

sort-result!

0 → 100644
+8 −0
Original line number Diff line number Diff line
> (sort-string "The quick brow fox jumps over the lazy dog!" #'string>)

"zyxwvuutsrrqpoooomlkjihhgfeeedcbaT!        " 
;; 559815 evals 359454 pairs in 16181 ms, 34596.1 evals/s
> (apply #'string (sort-list (split-string "The quick brow fox jumps over the lazy dog!" "") #'string>))

"zyxwvuutsrrqpoooomlkjihhgfeeedcbaT!        " 
;; 33390 evals 18405 pairs in 878 ms, 38017 evals/s