Function: seq-sort

seq-sort is a byte-compiled function defined in transient.el.

Signature

(seq-sort PRED SEQUENCE)

Documentation

Sort SEQUENCE using PRED as the sorting comparison function.

The result is a sequence of the same type as SEQUENCE.

Other relevant functions are documented in the sequence group.

Shortdoc

;; sequence
(seq-sort #'> '(1 2 3))
    => (3 2 1)

Implementations

(pred (list list)) in `seq-25.el'.

Undocumented

(pred sequence) in `seq-25.el'.

Undocumented

Source Code

;; Defined in ~/.emacs.d/elpa/transient-20260414.1009/transient.el
;; Could not find source code, showing raw function object.
#[642 "\304\203�\305!\202\f�\306\303\307\"\2067�\310\300\311\301\302\312\313\203'�\305\f!\202(�\306!\314\315!\"%\316#\210\211\262
\266\202$\207"
      [#s(cl--generic seq-sort
		      ((1 #s(cl--generic-generalizer cl--generic-typeof-generalizer 10
						     #[385 "\300\301D\302BBB\207"
							   [if type-of
							       ('null)]
							   6 "\n\n(fn NAME &rest _)"]
						     #[385 "
9\205�
\236\207"
							   [cl--typeof-types]
							   4 "\n\n(fn TAG &rest _)"])
			  #s(cl--generic-generalizer cl--generic-t-generalizer 0
						     #[385 "\300\207"
							   [nil]
							   3 "\n\n(fn NAME &rest _)"]
						     #[385 "\300\207"
							   [(t)]
							   3 "\n\n(fn TAG &rest _)"]))
		       (0 #s(cl--generic-generalizer cl--generic-t-generalizer 0
						     #[385 "\300\207"
							   [nil]
							   3 "\n\n(fn NAME &rest _)"]
						     #[385 "\300\207"
							   [(t)]
							   3 "\n\n(fn TAG &rest _)"])))
		      (#s(cl--generic-method
			  (t list)
			  nil nil
			  #[514 "\300\301!\"\207"
				[sort seq-copy]
				5 "\n\n(fn PRED LIST)"])
			 #s(cl--generic-method
			    (t t)
			    nil nil
			    #[514 "\300\301\302\"\"\303
\304!\"\207"
				  [seq-sort append nil seq-into type-of]
				  7 "\n\n(fn PRED SEQUENCE)"]))
		      nil)
	 ((0 #s(cl--generic-generalizer cl--generic-t-generalizer 0
					#[385 "\300\207"
					      [nil]
					      3 "\n\n(fn NAME &rest _)"]
					#[385 "\300\207"
					      [(t)]
					      3 "\n\n(fn TAG &rest _)"])))
	 (#s(cl--generic-method
	     (t list)
	     nil nil
	     #[514 "\300\301!\"\207"
		   [sort seq-copy]
		   5 "\n\n(fn PRED LIST)"])
	    #s(cl--generic-method
	       (t t)
	       nil nil
	       #[514 "\300\301\302\"\"\303
\304!\"\207"
		     [seq-sort append nil seq-into type-of]
		     7 "\n\n(fn PRED SEQUENCE)"]))
	 #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8125 data
		       (cons
			#[514 "\300\301!\"\207"
			      [sort seq-copy]
			      5 "\n\n(fn PRED LIST)"]))
	 apply type-of null gethash cl--generic-cache-miss 1 append
	 #[385 "
9\205�
\236\207"
	       [cl--typeof-types]
	       4 "\n\n(fn TAG &rest _)"]
	 #[385 "\300\207"
	       [(t)]
	       3 "\n\n(fn TAG &rest _)"]
	 nil puthash]
      15 "\n\n(fn ARG0 ARG &rest ARGS)"]