changeset 645: | 3e6a17fb5712 |
parent: | 5bd0eb9fa1fa |
child: | 926d95e5fdc7 |
author: | Richard Westhaver <ellis@rwest.io> |
date: | Wed, 11 Sep 2024 17:24:07 -0400 |
permissions: | -rw-r--r-- |
description: | clap upgrades |
388
dec30b6fd500
prelude/user packages init
Richard Westhaver <ellis@rwest.io>
parents:
384
diff
changeset
|
1 | ;;; std/pkg.lisp --- Standard Packages |
dec30b6fd500
prelude/user packages init
Richard Westhaver <ellis@rwest.io>
parents:
384
diff
changeset
|
2 | |
dec30b6fd500
prelude/user packages init
Richard Westhaver <ellis@rwest.io>
parents:
384
diff
changeset
|
3 | ;; |
291 | 4 | |
388
dec30b6fd500
prelude/user packages init
Richard Westhaver <ellis@rwest.io>
parents:
384
diff
changeset
|
5 | ;;; Code: |
413 | 6 | (pkg:defpkg :std-int |
7 | (:use :cl) |
|
8 | (:use-reexport :std/named-readtables :std/defpkg)) |
|
403 | 9 | |
408
96020a698c0b
std-user package updates
Richard Westhaver <ellis@rwest.io>
parents:
403
diff
changeset
|
10 | (in-package :std-int) |
403 | 11 | |
563 | 12 | (defpackage :std/condition |
291 | 13 | (:use :cl) |
14 | (:export ;; err |
|
224 | 15 | :std-error :std-error-message |
16 | :define-error-reporter |
|
17 | :deferror |
|
122
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
18 | :nyi! |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
19 | :required-argument |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
20 | :ignore-some-conditions |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
21 | :simple-style-warning |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
22 | :simple-reader-error |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
23 | :simple-parse-error |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
24 | :simple-program-error |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
25 | :circular-dependency |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
26 | :circular-dependency-items |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
27 | :unknown-argument |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
28 | :unknown-argument-name |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
29 | :unknown-argument-kind |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
30 | :unknown-argument-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
31 | :missing-argument |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
32 | :missing-argument-command |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
33 | :missing-argument-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
34 | :invalid-argument |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
35 | :invalid-argument-item |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
36 | :invalid-argument-reason |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
37 | :invalid-argument-p |
645 | 38 | :unwind-protect-case |
39 | :define-simple-error |
|
40 | :define-simple-error-reporter |
|
41 | :def-simple-error-reporter |
|
42 | :std-warning |
|
43 | :defwarning |
|
44 | :def-simple-warning-reporter |
|
45 | :def-warning-reporter)) |
|
291 | 46 | |
390 | 47 | (defpackage :std/sym |
291 | 48 | (:use :cl) |
49 | (:shadowing-import-from :sb-int |
|
50 | :with-unique-names :symbolicate :package-symbolicate :keywordicate :gensymify* |
|
51 | :gensymify) |
|
52 | (:export |
|
53 | :ensure-symbol |
|
54 | :format-symbol |
|
55 | :make-keyword |
|
56 | :make-slot-name |
|
57 | :make-gensym |
|
58 | :make-gensym-list |
|
59 | :with-gensyms |
|
60 | :with-unique-names |
|
61 | :symbolicate |
|
62 | :keywordicate |
|
63 | :gensymify |
|
64 | :gensymify*)) |
|
65 | ||
66 | (defpkg :std/list |
|
67 | (:use :cl) |
|
68 | (:shadowing-import-from :sb-int |
|
69 | :ensure-list :recons :memq :assq |
|
70 | :ensure-list :proper-list-of-length-p :proper-list-p :singleton-p) |
|
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
71 | (:import-from :std/sym :symb) |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
72 | (:import-from :std/named-readtables :parse-body) |
291 | 73 | (:export |
74 | :ensure-car |
|
75 | :ensure-cons |
|
76 | :appendf |
|
77 | :nconcf |
|
78 | :unionf |
|
79 | :nunionf |
|
80 | :reversef |
|
81 | :nreversef |
|
82 | :deletef |
|
83 | :flatten |
|
84 | :group |
|
85 | :let-binding-transform |
|
86 | :ensure-list :recons :memq :assq |
|
87 | :circular-list :circular-list-p :circular-tree-p :merge! |
|
456 | 88 | :sort! |
89 | :set-equal)) |
|
291 | 90 | |
91 | (defpkg :std/type |
|
92 | (:use :cl) |
|
293
e2e5c4831389
std fixes and rdb with-sst
Richard Westhaver <ellis@rwest.io>
parents:
292
diff
changeset
|
93 | (:import-from :std/sym :format-symbol :with-gensyms) |
291 | 94 | (:import-from :std/list :ensure-car) |
95 | (:export :+default-element-type+ |
|
96 | :array-index :array-length |
|
293
e2e5c4831389
std fixes and rdb with-sst
Richard Westhaver <ellis@rwest.io>
parents:
292
diff
changeset
|
97 | :negative-integer :non-negative-integer |
e2e5c4831389
std fixes and rdb with-sst
Richard Westhaver <ellis@rwest.io>
parents:
292
diff
changeset
|
98 | :positive-integer :octet |
e2e5c4831389
std fixes and rdb with-sst
Richard Westhaver <ellis@rwest.io>
parents:
292
diff
changeset
|
99 | :octet-vector)) |
291 | 100 | |
101 | (defpkg :std/num |
|
102 | (:use :cl) |
|
103 | (:export |
|
122
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
104 | ;; num/parse |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
105 | :parse-number |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
106 | :parse-real-number |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
107 | :parse-positive-real-number |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
108 | :invalid-number |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
109 | :invalid-number-value |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
110 | :invalid-number-reason |
115
7ed6bc70ca20
added basics of DB, included XDB, added IEEE floats to std/num module (new)
ellis <ellis@rwest.io>
parents:
110
diff
changeset
|
111 | ;; num/float |
7ed6bc70ca20
added basics of DB, included XDB, added IEEE floats to std/num module (new)
ellis <ellis@rwest.io>
parents:
110
diff
changeset
|
112 | :make-float-converters |
7ed6bc70ca20
added basics of DB, included XDB, added IEEE floats to std/num module (new)
ellis <ellis@rwest.io>
parents:
110
diff
changeset
|
113 | :encode-float32 |
7ed6bc70ca20
added basics of DB, included XDB, added IEEE floats to std/num module (new)
ellis <ellis@rwest.io>
parents:
110
diff
changeset
|
114 | :decode-float32 |
7ed6bc70ca20
added basics of DB, included XDB, added IEEE floats to std/num module (new)
ellis <ellis@rwest.io>
parents:
110
diff
changeset
|
115 | :encode-float64 |
547 | 116 | :decode-float64 |
117 | ;; num/leb128 |
|
118 | :read-leb128 |
|
119 | :encode-leb128 |
|
120 | :decode-leb128 |
|
121 | :read-uleb128 |
|
122 | :encode-uleb128 |
|
123 | :decode-uleb128)) |
|
291 | 124 | |
125 | (defpkg :std/stream |
|
442 | 126 | (:use :cl :sb-gray) |
291 | 127 | (:import-from :std/type :non-negative-integer :positive-integer) |
128 | (:export |
|
277
10faf95f90dd
stream and basic type upgrades. fixed some bugs and improved csv parsing
Richard Westhaver <ellis@rwest.io>
parents:
240
diff
changeset
|
129 | ;; stream |
279
efc3e9ec02bf
random tune-ups, added mpd and net/util.lisp
Richard Westhaver <ellis@rwest.io>
parents:
278
diff
changeset
|
130 | :copy-stream |
289
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
131 | :wrapped-stream |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
132 | :wrapped-character-input-stream |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
133 | :wrapped-character-output-stream |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
134 | :counting-character-input-stream |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
135 | :prefixed-character-output-stream |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
136 | :stream-of :char-count-of :line-count-of :col-count-of |
c4682fedd73d
added krypt lib, will probably add homer too
Richard Westhaver <ellis@rwest.io>
parents:
284
diff
changeset
|
137 | :prev-col-count-of :col-index-of :write-prefix |
291 | 138 | :prefix-of)) |
139 | ||
140 | (defpkg :std/array |
|
141 | (:use :cl) |
|
142 | (:export :copy-array :signed-array-length)) |
|
143 | ||
144 | (defpkg :std/hash-table |
|
145 | (:use :cl) |
|
146 | (:nicknames :std/ht) |
|
147 | (:export :hash-table-alist |
|
148 | :maphash-keys :hash-table-keys |
|
149 | :maphash-values :hash-table-values)) |
|
150 | ||
151 | (defpkg :std/alien |
|
152 | (:use :cl :sb-alien) |
|
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
153 | (:import-from :std/sym :symbolicate :with-gensyms) |
291 | 154 | (:export |
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
155 | :setfa |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
156 | :copy-c-string |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
157 | :clone-strings |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
158 | :clone-octets-to-alien |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
159 | :clone-octets-from-alien |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
160 | :foreign-int-to-integer |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
161 | :foreign-int-to-bool |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
162 | :bool-to-foreign-int |
469
7354623e5b54
define-alien-enum, zstd, skel, and pod work
Richard Westhaver <ellis@rwest.io>
parents:
456
diff
changeset
|
163 | :define-alien-enum |
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
164 | :define-opaque |
291 | 165 | :shared-object-name |
166 | :define-alien-loader |
|
167 | :c-string-to-string-list |
|
168 | :list-all-shared-objects |
|
169 | :num-cpus |
|
170 | :*cpus* |
|
171 | :loff-t |
|
172 | :memset)) |
|
173 | ||
174 | (defpkg :std/mop |
|
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
175 | (:use :cl :sb-mop :sb-pcl) |
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
176 | (:import-from :std/sym :symb :make-keyword) |
291 | 177 | (:export :list-slot-values-using-class |
178 | :list-class-methods :list-class-slots :list-indirect-slot-methods)) |
|
179 | |
|
357
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
180 | (defpkg :std/fu |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
181 | (:use :cl) |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
182 | (:import-from :std/sym :make-gensym-list) |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
183 | (:export |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
184 | :ensure-function |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
185 | :ensure-functionf |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
186 | :disjoin |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
187 | :conjoin |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
188 | :compose |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
189 | :multiple-value-compose |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
190 | :curry |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
191 | :rcurry)) |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
192 | |
291 | 193 | (defpkg :std/macs |
194 | (:use :cl) |
|
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
195 | (:import-from :std/sym :symb :mkstr :make-gensym-list :once-only :with-gensyms) |
357
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
196 | (:import-from :std/fu :compose) |
291 | 197 | (:import-from :std/named-readtables :in-readtable :parse-body) |
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
198 | (:import-from :std/list :flatten :defmacro!) |
291 | 199 | (:export |
200 | :named-lambda |
|
580
571685ae64f1
queries, cli fixes, dat/csv, emacs org-columns
Richard Westhaver <ellis@rwest.io>
parents:
563
diff
changeset
|
201 | :nested-loop |
122
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
202 | :g!-symbol-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
203 | :defmacro/g! |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
204 | :o!-symbol-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
205 | :o!-symbol-to-g!-symbol |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
206 | :defmacro! |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
207 | :defun! |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
208 | :dlambda |
291 | 209 | :until |
210 | :fact |
|
211 | :choose |
|
122
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
212 | :make-tlist |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
213 | :tlist-left |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
214 | :tlist-right |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
215 | :tlist-empty-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
216 | :tlist-add-left |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
217 | :tlist-add-right |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
218 | :tlist-rem-left |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
219 | :tlist-update |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
220 | :build-batcher-sn |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
221 | :sortf |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
222 | :dollar-symbol-p |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
223 | :if-match |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
224 | :when-match |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
225 | :once-only |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
226 | :destructuring-case |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
227 | :destructuring-ccase |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
228 | :destructuring-ecase |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
229 | :when-let |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
230 | :when-let* |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
231 | :if-let |
4ba88cac5bc7
num/parse, added DAT system, net/fetch, time/local, refactored trees
ellis <ellis@rwest.io>
parents:
119
diff
changeset
|
232 | :if-let* |
105 | 233 | :if* |
96 | 234 | :define-constant |
369 | 235 | :defvar-unbound |
96 | 236 | :def! |
237 | :eval-always |
|
291 | 238 | ;; ana |
239 | :awhen |
|
240 | :acond |
|
241 | :alambda |
|
242 | :nlet-tail |
|
243 | :alet% |
|
244 | :alet |
|
245 | :acond2 |
|
594
5bd0eb9fa1fa
rocksdb callbacks, missing symbol fixes
Richard Westhaver <ellis@rwest.io>
parents:
589
diff
changeset
|
246 | :aif |
291 | 247 | :it |
594
5bd0eb9fa1fa
rocksdb callbacks, missing symbol fixes
Richard Westhaver <ellis@rwest.io>
parents:
589
diff
changeset
|
248 | :%a |
291 | 249 | ;; pan |
594
5bd0eb9fa1fa
rocksdb callbacks, missing symbol fixes
Richard Westhaver <ellis@rwest.io>
parents:
589
diff
changeset
|
250 | :%p |
291 | 251 | :pandoriclet |
252 | :pandoriclet-get |
|
253 | :pandoriclet-set |
|
254 | :get-pandoric |
|
255 | :with-pandoric |
|
256 | :pandoric-hotpatch |
|
257 | :pandoric-recode |
|
258 | :plambda |
|
357
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
259 | :pandoric-eval |
7c1383c08493
port xsubseq, proc-parse. work on http and clap
Richard Westhaver <ellis@rwest.io>
parents:
355
diff
changeset
|
260 | :with-collectors |
359
0e00dec3de03
macs/control macros, seq functions, ported cl-cookie, added uri/domain.lisp, fully ported http! next we should remove dependence on cl+ssl
Richard Westhaver <ellis@rwest.io>
parents:
357
diff
changeset
|
261 | :collecting |
0e00dec3de03
macs/control macros, seq functions, ported cl-cookie, added uri/domain.lisp, fully ported http! next we should remove dependence on cl+ssl
Richard Westhaver <ellis@rwest.io>
parents:
357
diff
changeset
|
262 | :xor)) |
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
263 | |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
264 | (defpkg :std/thread |
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
265 | (:use :cl :sb-thread :sb-concurrency) |
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
266 | (:import-from :std/list :flatten) |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
267 | (:use-reexport :sb-thread) |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
268 | (:export |
492
dc0cc9c69789
ephemeral worker threads
Richard Westhaver <ellis@rwest.io>
parents:
482
diff
changeset
|
269 | :print-top-level :thread-support-p |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
270 | :find-thread-by-id :thread-id-list |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
271 | :timed-join-thread :kill-thread |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
272 | :wait-for-threads |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
273 | :hang :finish-threads |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
274 | :make-threads :with-threads |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
275 | :thread-count :dump-thread)) |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
276 | |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
277 | (defpkg :std/task |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
278 | (:use :cl :std/thread :sb-concurrency) |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
279 | (:import-from :std/thread :%make-thread) |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
280 | (:import-from :std/macs :if-let) |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
281 | (:export |
492
dc0cc9c69789
ephemeral worker threads
Richard Westhaver <ellis@rwest.io>
parents:
482
diff
changeset
|
282 | :spawn-workers |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
283 | :make-oracle :make-supervisor |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
284 | :oracle :run-task |
454 | 285 | :oracle-id :find-thread |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
286 | :push-job :push-task |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
287 | :push-worker :push-task-result |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
288 | :run-job :run-stage |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
289 | :pop-job :pop-task |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
290 | :pop-worker :pop-task-result |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
291 | :*task-pool* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
292 | :*tasks* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
293 | :*oracles* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
294 | :*workers* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
295 | :*jobs* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
296 | :*stages* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
297 | :define-task-kernel |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
298 | :*task-kernel* |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
299 | :default-task-kernel |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
300 | :make-worker |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
301 | :make-workers |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
302 | :worker-count |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
303 | :init-task-pool |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
304 | :make-task-pool |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
305 | :start-task-pool :pause-task-pool |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
306 | :shutdown-task-pool |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
307 | :push-stage :designate-oracle |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
308 | :make-task-pool |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
309 | :task :job :task-pool |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
310 | :stage :task-pool-p |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
311 | :job-tasks :make-job |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
312 | :job-p :task-object |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
313 | :make-task :task-p :task |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
314 | :task-pool-oracle :task-pool-jobs |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
315 | :task-pool-stages |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
316 | :task-pool-workers :task-pool-results |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
317 | :with-task-pool)) |
437
83f8623a6ec3
std work, renamed :disabled in deftest to :skip
Richard Westhaver <ellis@rwest.io>
parents:
431
diff
changeset
|
318 | |
355 | 319 | (defpkg :std/readtable |
320 | (:use :cl) |
|
321 | (:import-from :std/named-readtables :defreadtable) |
|
322 | (:import-from :std/fu :curry :rcurry :compose) |
|
323 | (:import-from :std/sym :symb) |
|
324 | (:import-from :std/list :defmacro!) ;; kludge |
|
325 | (:export |
|
326 | ;; readtable |
|
327 | :|#"-reader| |
|
328 | :|#`-reader| |
|
329 | :|#f-reader| |
|
330 | :|#$-reader| |
|
331 | :segment-reader |
|
332 | :match-mode-ppcre-lambda-form |
|
333 | :subst-mode-ppcre-lambda-form |
|
334 | :|#~-reader| |
|
335 | :_)) |
|
336 | ||
291 | 337 | (defpkg :std/bit |
338 | (:use :cl) |
|
293
e2e5c4831389
std fixes and rdb with-sst
Richard Westhaver <ellis@rwest.io>
parents:
292
diff
changeset
|
339 | (:import-from :std/type :octet :octet-vector) |
291 | 340 | (:export |
119 | 341 | :make-bits |
212
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
342 | :sign-bit |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
343 | :different-signs-p |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
344 | :mortify-bits |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
345 | :int-list-bits |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
346 | :aref-bit |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
347 | :make-bit-vector |
742e6d74752d
added sans-io module, more bits
Richard Westhaver <ellis@rwest.io>
parents:
208
diff
changeset
|
348 | :logbit |
234
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
349 | :bitfield |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
350 | :bitfield-slot-name |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
351 | :bitfield-slot-start |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
352 | :bitfield-slot-end |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
353 | :bitfield-slot-size |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
354 | :bitfield-slot-reader |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
355 | :bitfield-slot-initform |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
356 | :bitfield-slot-pack |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
357 | :bitfield-slot-unpack |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
358 | :parse-atomic-bitfield-slot-specifier |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
359 | :parse-compound-bitfield-slot-specifier |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
360 | :bitfield-slot |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
361 | :bitfield-boolean-slot |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
362 | :bitfield-integer-slot |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
363 | :bitfield-member-slot |
d7aa08025537
cry, obj/meta, ffi/magick
Richard Westhaver <ellis@rwest.io>
parents:
233
diff
changeset
|
364 | :define-bitfield |
240
a3b65a8138ac
html,http init, uuid, db stuff
Richard Westhaver <ellis@rwest.io>
parents:
238
diff
changeset
|
365 | :hex-string-to-octet-vector |
a3b65a8138ac
html,http init, uuid, db stuff
Richard Westhaver <ellis@rwest.io>
parents:
238
diff
changeset
|
366 | :octet-vector-to-hex-string |
a3b65a8138ac
html,http init, uuid, db stuff
Richard Westhaver <ellis@rwest.io>
parents:
238
diff
changeset
|
367 | :octets-to-integer |
a3b65a8138ac
html,http init, uuid, db stuff
Richard Westhaver <ellis@rwest.io>
parents:
238
diff
changeset
|
368 | :integer-to-octets |
544
ec1d4d544c36
parquet expansion, init leb128, add little-endian octet encoders
Richard Westhaver <ellis@rwest.io>
parents:
533
diff
changeset
|
369 | :octets-to-integer-le |
ec1d4d544c36
parquet expansion, init leb128, add little-endian octet encoders
Richard Westhaver <ellis@rwest.io>
parents:
533
diff
changeset
|
370 | :integer-to-octets-le |
ec1d4d544c36
parquet expansion, init leb128, add little-endian octet encoders
Richard Westhaver <ellis@rwest.io>
parents:
533
diff
changeset
|
371 | :read-little-endian |
ec1d4d544c36
parquet expansion, init leb128, add little-endian octet encoders
Richard Westhaver <ellis@rwest.io>
parents:
533
diff
changeset
|
372 | :write-little-endian |
291 | 373 | :hexchar-to-int)) |
374 | ||
375 | (defpkg :std/fmt |
|
376 | (:use :cl) |
|
377 | (:import-from :std/list :group :ensure-cons) |
|
378 | (:shadowing-import-from :uiop :println) |
|
379 | (:export :printer-status :fmt-row :format-sxhash :iprintln :fmt-tree :println)) |
|
380 | ||
381 | (defpkg :std/path |
|
382 | (:use :cl) |
|
383 | (:export |
|
384 | :wild-pathname |
|
385 | :non-wild-pathname |
|
386 | :absolute-pathname |
|
387 | :relative-pathname |
|
388 | :directory-pathname |
|
379 | 389 | :absolute-directory-pathname |
431
c40d2a41d7ce
source concatenating std.lisp, more systems, got zstd simple working, IO work, added dat/tar
Richard Westhaver <ellis@rwest.io>
parents:
424
diff
changeset
|
390 | :+wildfile+ :+pathsep+ :set-pathname-suffix :*tmp-suffix* |
c40d2a41d7ce
source concatenating std.lisp, more systems, got zstd simple working, IO work, added dat/tar
Richard Westhaver <ellis@rwest.io>
parents:
424
diff
changeset
|
391 | :tmpize-pathname)) |
291 | 392 | |
393 | (defpkg :std/os |
|
394 | (:use :cl) |
|
589 | 395 | (:import-from :std/macs :with-gensyms) |
291 | 396 | (:export |
397 | :list-all-users |
|
589 | 398 | :list-all-groups |
399 | :with-umask)) |
|
291 | 400 | |
401 | (defpkg :std/file |
|
402 | (:use :cl) |
|
292
00d1c8afcdbb
mostly done with std refactor, added sst-file-writer to rdb
Richard Westhaver <ellis@rwest.io>
parents:
291
diff
changeset
|
403 | (:import-from :std/macs :define-constant :once-only :eval-always) |
336 | 404 | (:import-from :std/stream :copy-stream) |
296 | 405 | (:import-from :std/type :octet :octet-vector :array-index :array-length :+default-element-type+) |
291 | 406 | (:export |
407 | :tmpfile |
|
408 | :file-pathname |
|
409 | :with-open-files |
|
410 | :write-stream-into-file |
|
411 | :write-file-into-stream |
|
412 | :file= |
|
413 | :file-size |
|
414 | :file-size-in-octets |
|
415 | :octet-vector= |
|
416 | :file-date |
|
417 | :file-timestamp |
|
418 | :directory-path-p |
|
342 | 419 | :*hidden-paths* |
291 | 420 | :hidden-path-p |
421 | :directory-path |
|
422 | :find-files |
|
423 | :count-file-lines)) |
|
424 | ||
425 | (defpkg :std/string |
|
426 | (:use :cl) |
|
427 | (:export |
|
428 | :*omit-nulls* |
|
429 | :*whitespaces* |
|
430 | :string-designator |
|
431 | :ssplit |
|
432 | :trim |
|
433 | :collapse-whitespaces |
|
434 | :make-template-parser |
|
435 | :string-case)) |
|
436 | ||
437 | (defpkg :std/seq |
|
438 | (:use :cl) |
|
295 | 439 | (:import-from :sb-int :collect) |
291 | 440 | (:import-from :std/array :signed-array-length) |
359
0e00dec3de03
macs/control macros, seq functions, ported cl-cookie, added uri/domain.lisp, fully ported http! next we should remove dependence on cl+ssl
Richard Westhaver <ellis@rwest.io>
parents:
357
diff
changeset
|
441 | (:export :take :starts-with-subseq :ends-with-subseq |
0e00dec3de03
macs/control macros, seq functions, ported cl-cookie, added uri/domain.lisp, fully ported http! next we should remove dependence on cl+ssl
Richard Westhaver <ellis@rwest.io>
parents:
357
diff
changeset
|
442 | :split-sequence :split-sequence-if :split-sequence-if-not)) |
291 | 443 | |
444 | (defpkg :std/sys |
|
445 | (:use :cl) |
|
295 | 446 | (:shadowing-import-from :sb-kernel :get-lisp-obj-address :with-pinned-objects :unbound-marker-p :generation-of) |
447 | (:shadowing-import-from :sb-vm :list-allocated-objects) |
|
533 | 448 | (:import-from :sb-impl :*logical-hosts*) |
291 | 449 | (:export |
450 | :current-lisp-implementation |
|
482 | 451 | :current-machine |
452 | :list-package-symbols |
|
586
7ce855f76e1d
net/fetch upgrades, fixes, net/err -> net/condition
Richard Westhaver <ellis@rwest.io>
parents:
580
diff
changeset
|
453 | :package-symbols |
7ce855f76e1d
net/fetch upgrades, fixes, net/err -> net/condition
Richard Westhaver <ellis@rwest.io>
parents:
580
diff
changeset
|
454 | :package-symbol-names |
533 | 455 | :append-logical-hosts |
291 | 456 | :save-lisp-tree-shake-and-die |
374 | 457 | :save-lisp-and-live |
424
1005a80b8201
add forget-shared-object from rurik
Richard Westhaver <ellis@rwest.io>
parents:
413
diff
changeset
|
458 | :forget-shared-object |
374 | 459 | :forget-shared-objects)) |
291 | 460 | |
461 | (defpkg :std |
|
462 | (:use :cl :sb-unicode :cl-ppcre :sb-mop :sb-c :sb-thread :sb-alien :sb-gray :sb-concurrency) |
|
563 | 463 | (:use-reexport :std/named-readtables :std/defpkg :std/condition |
497
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
464 | :std/sym :std/list :std/type :std/num |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
465 | :std/stream :std/fu :std/array :std/hash-table |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
466 | :std/alien :std/mop :std/thread :std/task |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
467 | :std/macs :std/bit :std/fmt :std/path |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
468 | :std/os :std/file :std/string :std/seq |
bcf772e86fbc
add std/task, some fixes and added cli/tools/systemd
Richard Westhaver <ellis@rwest.io>
parents:
492
diff
changeset
|
469 | :std/sys :std/readtable)) |
403 | 470 | |
413 | 471 | (defpkg :std-user |
472 | (:use :cl :cl-user :sb-ext :std |
|
473 | :std-int :sb-alien :sb-thread :sb-bsd-sockets |
|
448 | 474 | :sb-gray :sb-mop :sb-debug)) |
408
96020a698c0b
std-user package updates
Richard Westhaver <ellis@rwest.io>
parents:
403
diff
changeset
|
475 | |
413 | 476 | (pkg:define-lisp-package :std) |