-
Notifications
You must be signed in to change notification settings - Fork 0
/
consecution-intrinsic.asd
91 lines (85 loc) · 2.53 KB
/
consecution-intrinsic.asd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
(cl:in-package #:asdf-user)
(defsystem "consecution-intrinsic"
:depends-on
("acclimation"
"alexandria"
"closer-mop"
"fast-generic-functions")
:components
((:module code
:pathname "Code/"
:serial t
:components
((:file "packages-intrinsic")
;; Load all types, conditions, and utilities.
(:file "types")
(:file "conditions")
(:file "condition-reporters-en")
(:file "sequence-function")
(:file "generic-functions")
;; Load the a few elementary sequence functions and seal
;; them. This way, the subsequent definitions can already use
;; optimized versions of them.
(:file "length")
(:file "elt")
;; Load utilities.
(:file "utilities")
(:file "with-cons-iterator")
(:file "with-key-function")
(:file "with-list-start-and-end")
(:file "with-predicate")
(:file "with-reified-result-type")
(:file "with-test-function")
(:file "with-vector-start-and-end")
(:file "for-each-relevant-cons")
(:file "for-each-relevant-element")
(:file "sequence-scanner")
;; Now that all utilities and elementary sequence functions have been
;; defined, it is possible to load the remaining functions. The order
;; is mostly alphabetical, except that some very important functions
;; like MAKE-SEQUENCE and NREVERSE are loaded early.
(:file "adjust-sequence")
(:file "make-sequence")
(:file "make-sequence-like")
(:file "copy-seq")
(:file "nreverse")
(:file "count")
(:file "count-if")
(:file "count-if-not")
(:file "delete-aux")
(:file "delete-duplicates")
(:file "delete")
(:file "delete-if")
(:file "delete-if-not")
(:file "fill")
(:file "find")
(:file "find-if")
(:file "find-if-not")
(:file "map-for-effect")
(:file "map-into")
(:file "map")
(:file "concatenate")
(:file "merge")
(:file "mismatch")
(:file "nsubstitute")
(:file "nsubstitute-if")
(:file "nsubstitute-if-not")
(:file "position-if")
(:file "position-if-not")
(:file "position")
(:file "reduce")
(:file "remove-duplicates")
(:file "remove-aux")
(:file "remove-if")
(:file "remove-if-not")
(:file "remove")
(:file "replace")
(:file "reverse")
(:file "search")
(:file "sort")
(:file "stable-sort")
;; Uncomment this line when we have a working DEFSETF.
;; (:file "subseq")
(:file "substitute")
(:file "substitute-if")
(:file "substitute-if-not")))))