- fix paren typo in sort interfaces
- rename SORT to SORTING so we can hook it into the regular build
This commit is contained in:
parent
cb9f440657
commit
d772a5df84
|
@ -152,7 +152,7 @@
|
||||||
;;;
|
;;;
|
||||||
;;; vector-delete-neighbor-dups v = [start end] -> vector
|
;;; vector-delete-neighbor-dups v = [start end] -> vector
|
||||||
|
|
||||||
(define-interface sort-interface
|
(define-interface sorting-interface
|
||||||
(compound-interface
|
(compound-interface
|
||||||
sorted-interface
|
sorted-interface
|
||||||
(export
|
(export
|
||||||
|
@ -185,7 +185,7 @@
|
||||||
:vector))
|
:vector))
|
||||||
|
|
||||||
((vector-sort! vector-stable-sort!)
|
((vector-sort! vector-stable-sort!)
|
||||||
(proc ((proc (:value :value) :boolean) :vector) :unspecific)))
|
(proc ((proc (:value :value) :boolean) :vector) :unspecific))
|
||||||
|
|
||||||
(list-delete-neighbor-dups
|
(list-delete-neighbor-dups
|
||||||
(proc ((proc (:value :value) :boolean)
|
(proc ((proc (:value :value) :boolean)
|
||||||
|
@ -196,4 +196,4 @@
|
||||||
:vector
|
:vector
|
||||||
&opt
|
&opt
|
||||||
:exact-integer :exact-integer)
|
:exact-integer :exact-integer)
|
||||||
:vector))))
|
:vector)))))
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
|
|
||||||
;;; The general sort package:
|
;;; The general sort package:
|
||||||
|
|
||||||
(define-structure sort sort-interface
|
(define-structure sorting sorting-interface
|
||||||
(open scheme
|
(open scheme
|
||||||
list-merge-sort
|
list-merge-sort
|
||||||
vector-heap-sort
|
vector-heap-sort
|
||||||
|
|
Loading…
Reference in New Issue