sort results

ab56cba4 · Juergen Nickelsen · b2cc7ad1 · ab56cba4
Commit ab56cba4 authored Jun 25, 2015 by Juergen Nickelsen
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 0 deletions

sort-result! sort-result! +8 -0

No files found.
--- a/sort-result!
+++ b/sort-result!
+> (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