Initial implementation of cl-sort