mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-19 05:39:17 +02:00
29 lines
1.1 KiB
Scheme
29 lines
1.1 KiB
Scheme
(define-library (srfi 132)
|
|
|
|
|
|
|
|
(import (except (scheme base) vector-copy vector-copy!)
|
|
(rename (only (scheme base) vector-copy vector-copy! vector-fill!)
|
|
(vector-copy r7rs-vector-copy)
|
|
(vector-copy! r7rs-vector-copy!)
|
|
(vector-fill! r7rs-vector-fill!)
|
|
))
|
|
|
|
; (import (scheme base))
|
|
(import (scheme cxr))
|
|
(export list-sorted? vector-sorted? list-merge vector-merge list-sort vector-sort
|
|
list-stable-sort vector-stable-sort list-merge! vector-merge! list-sort! vector-sort!
|
|
list-stable-sort! vector-stable-sort!
|
|
list-delete-neighbor-dups vector-delete-neighbor-dups
|
|
list-delete-neighbor-dups! vector-delete-neighbor-dups!)
|
|
(include "sorting/delndups.scm")
|
|
(include "sorting/lmsort.scm")
|
|
(include "sorting/sortp.scm")
|
|
(include "sorting/vector-util.scm")
|
|
(include "sorting/vhsort.scm")
|
|
(include "sorting/visort.scm")
|
|
(include "sorting/vmsort.scm")
|
|
(include "sorting/vqsort2.scm")
|
|
(include "sorting/vqsort3.scm")
|
|
(include "sorting/sort.scm") ; must be last
|
|
)
|