JortSort: Difference between revisions
Content added Content deleted
(→{{header|Kotlin}}: Updated example see https://github.com/dkandalov/rosettacode-kotlin for details) |
(→{{header|Common Lisp}}: This not only scrambles the program's input (unwarranted side effect) but can yield false positives.) |
||
Line 215: | Line 215: | ||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||
{{incorrect|sort is destructive}} |
|||
<lang lisp> |
<lang lisp> |
||
(defun jort-sort (x) (equalp x (sort x #'< ))) |
(defun jort-sort (x) (equalp x (sort x #'< ))) |