## Function: COMMON-LISP:STABLE-SORT [![package](https://img.shields.io/badge/Package-COMMON--LISP-5f9ea0.svg?style=social&colorA=999999)](../) [![type](https://img.shields.io/badge/Type-Function-5f9ea0.svg?style=social&colorA=999999)](../#function) [![clhs](https://img.shields.io/badge/CLHS-STABLE--SORT-5f9ea0.svg?style=social&colorA=999999)](http://www.lispworks.com/documentation/HyperSpec/Body/f_sort_.htm) [![github](https://img.shields.io/badge/GitHub-View_the_source-5f9ea0.svg?style=social&colorA=999999&logo=github)](https://github.com/sbcl/sbcl/blob/master/src/code/sort.lisp/) > Destructively sort SEQUENCE. PREDICATE should return non-NIL if > ARG1 is to precede ARG2. ### Lambda list ```cl (sequence sb-impl::predicate &rest sb-impl::args &key sb-impl::key) ```