changeset 86: |
278fb1d6dfa8 |
parent 85: |
1088a94a6673 |
child 87: |
8203bd080c77 |
author: |
ellis <ellis@rwest.io> |
date: |
Fri, 08 Dec 2023 22:58:17 -0500 |
files: |
install.org lisp/app/cli/cli.asd lisp/app/cli/packy.lisp lisp/lib/packy/cli.lisp lisp/lib/packy/packy.asd lisp/lib/packy/pkg.lisp lisp/lib/packy/tests.lisp tests.org |
description: |
tests, cli/packy, install |
1.1--- a/install.org Fri Dec 08 22:39:00 2023 -0500
1.2+++ b/install.org Fri Dec 08 22:58:17 2023 -0500
1.3@@ -141,6 +141,29 @@
1.4 compressed 0 bytes into 9 at level 9
1.5 #+end_example
1.6
1.7+*** cli/packy
1.8+#+begin_src shell :results pp replace :exports code
1.9+ sbcl --noinform --non-interactive \
1.10+ --eval '(ql:quickload :cli/packy)' \
1.11+ --eval "(asdf:make :cli/packy)"
1.12+ mv lisp/app/cli/packy ~/.local/bin/
1.13+#+end_src
1.14+
1.15+#+RESULTS:
1.16+#+begin_example
1.17+To load "cli/packy":
1.18+ Load 1 ASDF system:
1.19+ cli/packy
1.20+; Loading "cli/packy"
1.21+..................................................
1.22+[package packy]...................................
1.23+[package cli/packy].
1.24+compressed 32768 bytes into 5077 at level 9
1.25+compressed 236388352 bytes into 9223131 at level 9
1.26+compressed 8257536 bytes into 2552556 at level 9
1.27+compressed 0 bytes into 9 at level 9
1.28+#+end_example
1.29+
1.30 ** Rust
1.31 *** cli/cc-init
1.32 #+begin_src shell :results output pp :exports code
2.1--- a/lisp/app/cli/cli.asd Fri Dec 08 22:39:00 2023 -0500
2.2+++ b/lisp/app/cli/cli.asd Fri Dec 08 22:58:17 2023 -0500
2.3@@ -36,8 +36,17 @@
2.4 (defsystem :cli/skel
2.5 :build-operation program-op
2.6 :build-pathname "skel"
2.7- :entry-point "std/cli::main"
2.8+ :entry-point "cli/skel::main"
2.9 :components ((:file "skel"))
2.10 :depends-on (:uiop :cl-ppcre :std/all :std/cli :skel)
2.11 :in-order-to ((test-op (test-op "app/tests")))
2.12 :perform (test-op (o c) (symbol-call :std/rt :do-tests :app)))
2.13+
2.14+(defsystem :cli/packy
2.15+ :build-operation program-op
2.16+ :build-pathname "packy"
2.17+ :entry-point "cli/packy::main"
2.18+ :components ((:file "packy"))
2.19+ :depends-on (:uiop :cl-ppcre :std/all :std/cli :packy)
2.20+ :in-order-to ((test-op (test-op "app/tests")))
2.21+ :perform (test-op (o c) (symbol-call :std/rt :do-tests :app)))
3.1--- /dev/null Thu Jan 01 00:00:00 1970 +0000
3.2+++ b/lisp/app/cli/packy.lisp Fri Dec 08 22:58:17 2023 -0500
3.3@@ -0,0 +1,11 @@
3.4+(defpackage :cli/packy
3.5+ (:use :cl :std :sb-ext)
3.6+ (:export :main))
3.7+
3.8+(in-package :cli/packy)
3.9+
3.10+(defun run ())
3.11+
3.12+(defmain ()
3.13+ (run)
3.14+ (sb-ext:exit :code 0))
4.1--- a/lisp/lib/packy/cli.lisp Fri Dec 08 22:39:00 2023 -0500
4.2+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
4.3@@ -1,11 +0,0 @@
4.4-(defpackage :packy/cli
4.5- (:use :cl :std :sb-ext)
4.6- (:export :main))
4.7-
4.8-(in-package :packy/cli)
4.9-
4.10-(defun run ())
4.11-
4.12-(defmain ()
4.13- (run)
4.14- (sb-ext:exit :code 0))
5.1--- a/lisp/lib/packy/packy.asd Fri Dec 08 22:39:00 2023 -0500
5.2+++ b/lisp/lib/packy/packy.asd Fri Dec 08 22:58:17 2023 -0500
5.3@@ -1,16 +1,10 @@
5.4-#+sb-core-compression
5.5-(defmethod asdf:perform ((o asdf:image-op) (c asdf:system))
5.6- (uiop:dump-image (asdf:output-file o c) :executable t :compression t))
5.7-
5.8+;;; packy.asd --- universal package manager
5.9 (defsystem "packy"
5.10 :class :package-inferred-system
5.11 :defsystem-depends-on (:asdf-package-system)
5.12 :version "0.1.0"
5.13 :maintainer "ellis <ellis@rwest.io>"
5.14 :bug-tracker "https://lab.rwest.io/ellis/packy/issues"
5.15- :depends-on (:uiop :asdf :sb-posix :sb-bsd-sockets :sb-concurrency :std :cl-ppcre :packy/cli)
5.16- :build-operation "program-op"
5.17- :build-pathname "packy"
5.18- :entry-point "packy/cli:main"
5.19+ :depends-on (:uiop :asdf :sb-posix :sb-bsd-sockets :sb-concurrency :std :cl-ppcre :packy/pkg)
5.20 :in-order-to ((test-op (test-op :packy/tests)))
5.21- :perform (test-op (o c) (symbol-call :std/rt :do-tests :packy)))
5.22+ :perform (test-op (o c) (symbol-call :rt :do-tests :packy)))
6.1--- a/lisp/lib/packy/pkg.lisp Fri Dec 08 22:39:00 2023 -0500
6.2+++ b/lisp/lib/packy/pkg.lisp Fri Dec 08 22:58:17 2023 -0500
6.3@@ -0,0 +1,4 @@
6.4+(defpackage :packy
6.5+ (:use :cl :std :rdb))
6.6+
6.7+(in-package :packy)
7.1--- a/lisp/lib/packy/tests.lisp Fri Dec 08 22:39:00 2023 -0500
7.2+++ b/lisp/lib/packy/tests.lisp Fri Dec 08 22:58:17 2023 -0500
7.3@@ -1,4 +1,6 @@
7.4 (defpackage :packy/tests
7.5- (:use :cl :std :sb-ext))
7.6+ (:use :cl :std/rt :packy))
7.7
7.8 (in-package :packy/tests)
7.9+(defsuite :packy)
7.10+(in-suite :packy)
8.1--- a/tests.org Fri Dec 08 22:39:00 2023 -0500
8.2+++ b/tests.org Fri Dec 08 22:58:17 2023 -0500
8.3@@ -1,13 +1,13 @@
8.4 {{{header(tests,Richard Westhaver,ellis@rwest.io,core test results)}}}
8.5-* tests
8.6-** rust
8.7-*** sys
8.8+* rust
8.9+** sys
8.10 These crates contain FFI bindings to foreign libraries, usually in C.
8.11-**** btrfs
8.12-**** btrfsutil
8.13-*** lib
8.14-**** TODO alch
8.15-**** audio
8.16+*** btrfs
8.17+*** btrfsutil
8.18+*** rocksdb
8.19+** lib
8.20+*** TODO alch
8.21+*** audio
8.22 #+begin_src shell :dir rust/lib/audio :results output replace :exports results
8.23 cargo test
8.24 #+end_src
8.25@@ -25,7 +25,7 @@
8.26 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.27
8.28 #+end_example
8.29-**** crypto
8.30+*** crypto
8.31 #+begin_src shell :dir rust/lib/crypto :results output replace :exports results
8.32 cargo test
8.33 #+end_src
8.34@@ -48,14 +48,14 @@
8.35 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.36
8.37 #+end_example
8.38-**** TODO db
8.39+*** TODO db
8.40 #+begin_src shell :dir rust/lib/db :results output replace :exports results :eval no
8.41 cargo test
8.42 #+end_src
8.43
8.44 #+RESULTS:
8.45
8.46-**** flate
8.47+*** flate
8.48 #+begin_src shell :dir rust/lib/flate :results output replace :exports results
8.49 cargo test
8.50 #+end_src
8.51@@ -73,7 +73,7 @@
8.52 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.53
8.54 #+end_example
8.55-**** hash
8.56+*** hash
8.57 #+begin_src shell :dir rust/lib/hash :results output replace :exports results
8.58 cargo test
8.59 #+end_src
8.60@@ -94,8 +94,8 @@
8.61 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.62
8.63 #+end_example
8.64-**** krypt
8.65-**** logger
8.66+*** krypt
8.67+*** logger
8.68 #+begin_src shell :dir rust/lib/logger :results output replace :exports results
8.69 cargo test
8.70 #+end_src
8.71@@ -113,7 +113,7 @@
8.72 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.73
8.74 #+end_example
8.75-**** sxp
8.76+*** sxp
8.77 #+begin_src shell :dir rust/lib/sxp :results output replace :exports results
8.78 cargo test
8.79 #+end_src
8.80@@ -174,8 +174,8 @@
8.81 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.82
8.83 #+end_example
8.84-**** tenex
8.85-**** util
8.86+*** tenex
8.87+*** util
8.88 #+begin_src shell :dir rust/lib/util :results output replace :exports results
8.89 cargo test
8.90 #+end_src
8.91@@ -193,10 +193,11 @@
8.92 test result: ok. 0 passed; 0 failed; 0 ignored; 0 measured; 0 filtered out; finished in 0.00s
8.93
8.94 #+end_example
8.95-** lisp
8.96+* lisp
8.97 #+begin_src lisp :results silent
8.98 (let ((systems
8.99 '("lisp/std/std.asd" "lisp/lib/rdb/rdb.asd" "lisp/lib/organ/organ.asd" "lisp/lib/skel/skel.asd"
8.100+ "lisp/lib/packy/packy.asd" "lisp/lib/nlp/nlp.asd" "lisp/lib/dot/dot.asd"
8.101 "lisp/ffi/rocksdb/rocksdb.asd" "lisp/ffi/btrfs/btrfs.asd" "lisp/ffi/uring/uring.asd"
8.102 "lisp/ffi/k/k.asd" "lisp/ffi/bqn/bqn.asd" "lisp/ffi/tree-sitter/tree-sitter.asd"
8.103 "lisp/ffi/blake3/blake3.asd")))
8.104@@ -204,8 +205,7 @@
8.105 (asdf:load-system :std)
8.106 (asdf:load-system :std/rt)
8.107 #+end_src
8.108-*** std
8.109-**** tests
8.110+** std
8.111 #+begin_src lisp :results output replace :exports both
8.112 (load "lisp/std/tests.lisp")
8.113 (asdf:test-system :std)
8.114@@ -214,16 +214,16 @@
8.115 #+RESULTS:
8.116 #+begin_example
8.117 in suite std with 10/10 tests:
8.118-#<PASS PAN>
8.119-#<PASS ANA>
8.120-#<PASS FMT>
8.121-#<PASS ALIEN>
8.122-#<PASS THREAD>
8.123-#<PASS COND>
8.124-#<PASS LOG>
8.125-#<PASS LIST>
8.126-#<PASS STR>
8.127-#<PASS SYM>
8.128+#<PASS PAN-TEST278115>
8.129+#<PASS ANA-TEST278114>
8.130+#<PASS FMT-TEST278113>
8.131+#<PASS ALIEN-TEST278112>
8.132+#<PASS THREAD-TEST278111>
8.133+#<PASS COND-TEST278110>
8.134+#<PASS LOG-TEST278109>
8.135+#<PASS LIST-TEST278108>
8.136+#<PASS STR-TEST278107>
8.137+#<PASS SYM-TEST278106>
8.138 No tests failed.
8.139 #+end_example
8.140
8.141@@ -235,54 +235,108 @@
8.142
8.143 #+RESULTS:
8.144 : in suite sxp with 4/4 tests:
8.145-: #<PASS SXP-STREAM>
8.146-: #<PASS SXP-STRING>
8.147-: #<PASS SXP-FILE>
8.148-: #<PASS FORMS>
8.149+: #<PASS SXP-STREAM-TEST278123>
8.150+: #<PASS SXP-STRING-TEST278122>
8.151+: #<PASS SXP-FILE-TEST278121>
8.152+: #<PASS FORMS-TEST278120>
8.153 : No tests failed.
8.154
8.155-*** lib
8.156-**** rdb
8.157-***** tests
8.158+** lib
8.159+*** rdb
8.160 #+begin_src lisp :results output replace :exports results
8.161 (load "lisp/lib/rdb/tests.lisp")
8.162 (asdf:test-system :rdb)
8.163 #+end_src
8.164 #+RESULTS:
8.165-: in suite rdb with 2/2 tests:
8.166-: #<PASS WITH-ITER>
8.167-: #<PASS WITH-DB>
8.168+: in suite rdb with 4/4 tests:
8.169+: #<PASS WITH-CF-TEST2374>
8.170+: #<PASS WITH-ITER-TEST2373>
8.171+: #<PASS WITH-DB-TEST2372>
8.172+: #<PASS RDB-TEST2371>
8.173 : No tests failed.
8.174-**** organ
8.175-***** tests
8.176+*** organ
8.177 #+begin_src lisp :results output replace :exports results
8.178 (load "lisp/lib/organ/tests.lisp")
8.179 (asdf:test-system :organ)
8.180 #+end_src
8.181 #+RESULTS:
8.182-: in suite organ with 3/3 tests:
8.183-: #<PASS ORG-HEADLINE>
8.184-: #<PASS ORG-LINES>
8.185-: #<PASS ORG-FILE>
8.186-: No tests failed.
8.187-**** skel
8.188-***** tests
8.189+#+begin_example
8.190+in suite organ with 3/3 tests:
8.191+
8.192+#<FAIL #<FUNCTION (LAMBDA (STRING CL-PPCRE::START CL-PPCRE::END)
8.193+ :IN
8.194+ CL-PPCRE::CREATE-SCANNER-AUX) {100BDCE29B}> IS NOT A STRING DESIGNATOR.>
8.195+#<PASS ORG-LINES-TEST2339>
8.196+#<PASS ORG-FILE-TEST2338>
8.197+1 out of 3 total tests failed:
8.198+ #<STD/RT:TEST ORG-HEADLINE :FN ORG-HEADLINE-TEST2340 :ARGS NIL :PERSIST NIL {1009D95003}>.
8.199+1 unexpected failures:
8.200+ #<FAIL #<FUNCTION (LAMBDA (STRING CL-PPCRE::START CL-PPCRE::END)
8.201+ :IN
8.202+ CL-PPCRE::CREATE-SCANNER-AUX) {100BDCE29B}> IS NOT A STRING DESIGNATOR.>.
8.203+#+end_example
8.204+*** skel
8.205 #+begin_src lisp :results output replace :exports results
8.206 (load "lisp/lib/skel/tests.lisp")
8.207 (asdf:test-system :skel)
8.208 #+end_src
8.209 #+RESULTS:
8.210-: in suite skel with 6/6 tests:
8.211-: #<PASS VM>
8.212-: #<PASS MAKEFILE>
8.213-: #<PASS SKELRC>
8.214-: #<PASS SKELFILE>
8.215-: #<PASS HEADER-COMMENTS>
8.216-: #<PASS SANITY>
8.217+#+begin_example
8.218+in suite skel with 6/6 tests:
8.219+#<PASS VM-TEST1314>
8.220+
8.221+#<FAIL WHILE COMPUTING THE CLASS PRECEDENCE LIST OF THE CLASS NAMED SKEL/COMP/MAKE:MAKEFILE.
8.222+THE CLASS NAMED SKEL/COMP/MAKE::SKEL IS A FORWARD REFERENCED CLASS.
8.223+THE CLASS NAMED SKEL/COMP/MAKE::SKEL IS A DIRECT SUPERCLASS OF THE CLASS NAMED SKEL/COMP/MAKE:MAKEFILE.>
8.224+#<PASS SKELRC-TEST1312>
8.225+#<FAIL THE FUNCTION SKEL/CORE/UTIL::GETCWD IS UNDEFINED.>
8.226+#<PASS HEADER-COMMENTS-TEST1310>
8.227+#<PASS SANITY-TEST1309>
8.228+2 out of 6 total tests failed:
8.229+ #<STD/RT:TEST MAKEFILE :FN MAKEFILE-TEST1313 :ARGS NIL :PERSIST NIL {100B217673}>,
8.230+ #<STD/RT:TEST SKELFILE :FN SKELFILE-TEST1311 :ARGS NIL :PERSIST NIL {100B2123F3}>.
8.231+2 unexpected failures:
8.232+ #<FAIL THE FUNCTION SKEL/CORE/UTIL::GETCWD IS UNDEFINED.>,
8.233+ #<FAIL WHILE COMPUTING THE CLASS PRECEDENCE LIST OF THE CLASS NAMED SKEL/COMP/MAKE:MAKEFILE.
8.234+THE CLASS NAMED SKEL/COMP/MAKE::SKEL IS A FORWARD REFERENCED CLASS.
8.235+THE CLASS NAMED SKEL/COMP/MAKE::SKEL IS A DIRECT SUPERCLASS OF THE CLASS NAMED SKEL/COMP/MAKE:MAKEFILE.>.
8.236+#+end_example
8.237+*** packy
8.238+#+begin_src lisp :results output replace :exports results
8.239+ (load "lisp/lib/packy/tests.lisp")
8.240+ (asdf:test-system :packy)
8.241+#+end_src
8.242+
8.243+#+RESULTS:
8.244+: in suite packy with 0/0 tests:
8.245 : No tests failed.
8.246-*** ffi
8.247-**** btrfs
8.248-***** tests
8.249+
8.250+*** nlp
8.251+#+begin_src lisp :results output replace :exports results
8.252+ (load "lisp/lib/nlp/tests.lisp")
8.253+ (asdf:test-system :nlp)
8.254+#+end_src
8.255+
8.256+#+RESULTS:
8.257+: in suite nlp with 3/3 tests:
8.258+: #<PASS TEXTRANK-TEST278176>
8.259+: #<PASS DBSCAN-TEST278175>
8.260+: #<PASS PORTER-STEM-TEST278174>
8.261+: No tests failed.
8.262+
8.263+*** dot
8.264+#+begin_src lisp :results output replace :exports results
8.265+ (load "lisp/lib/dot/tests.lisp")
8.266+ (asdf:test-system :dot)
8.267+#+end_src
8.268+
8.269+#+RESULTS:
8.270+: in suite dot with 1/1 tests:
8.271+: #<PASS DOT-TEST278208>
8.272+: No tests failed.
8.273+
8.274+** ffi
8.275+*** btrfs
8.276 #+begin_src lisp :results output replace :exports results
8.277 (load "lisp/ffi/btrfs/tests.lisp")
8.278 (asdf:test-system :btrfs)
8.279@@ -290,28 +344,25 @@
8.280 #+RESULTS:
8.281 : in suite btrfs with 0/0 tests:
8.282 : No tests failed.
8.283-**** rocksdb
8.284-***** tests
8.285+*** rocksdb
8.286 #+begin_src lisp :results output replace :exports results
8.287 (load "lisp/ffi/rocksdb/tests.lisp")
8.288 (asdf:test-system :rocksdb)
8.289 #+end_src
8.290 #+RESULTS:
8.291 : in suite rocksdb with 2/2 tests:
8.292-: #<PASS DB-BASIC>
8.293-: #<PASS SET-OPTS>
8.294+: #<PASS DB-BASIC-TEST276139>
8.295+: #<PASS SET-OPTS-TEST276138>
8.296 : No tests failed.
8.297-**** uring
8.298-***** tests
8.299-#+begin_src lisp :package uring.tests :results output replace :exports results
8.300+*** uring
8.301+#+begin_src lisp :results output replace :exports results
8.302 (load "lisp/ffi/uring/tests.lisp")
8.303 (asdf:test-system :uring)
8.304 #+end_src
8.305 #+RESULTS:
8.306 : in suite uring with 0/0 tests:
8.307 : No tests failed.
8.308-**** tree-sitter
8.309-***** tests
8.310+*** tree-sitter
8.311 #+begin_src lisp :results output replace :exports results
8.312 (load "lisp/ffi/tree-sitter/tests.lisp")
8.313 (asdf:test-system :tree-sitter)
8.314@@ -319,28 +370,28 @@
8.315 #+RESULTS:
8.316 : in suite tree-sitter with 0/0 tests:
8.317 : No tests failed.
8.318-**** k
8.319-***** tests
8.320+*** k
8.321 #+begin_src lisp :results output replace :exports results
8.322 (load "lisp/ffi/k/tests.lisp")
8.323 (asdf:test-system :k)
8.324 #+end_src
8.325 #+RESULTS:
8.326 : in suite k with 1/1 tests:
8.327-: #<PASS K>
8.328+: #<PASS K-TEST827560>
8.329 : No tests failed.
8.330-**** bqn
8.331-***** tests
8.332+*** bqn
8.333 #+begin_src lisp :results output replace :exports results
8.334 (load "lisp/ffi/bqn/tests.lisp")
8.335 (asdf:test-system :bqn)
8.336 #+end_src
8.337 #+RESULTS:
8.338 : in suite bqn with 1/1 tests:
8.339-: #<PASS BQN>
8.340-: No tests failed.
8.341-
8.342-** emacs
8.343+: #<FAIL ARITHMETIC ERROR FLOATING-POINT-INVALID-OPERATION SIGNALLED>
8.344+: 1 out of 1 total tests failed:
8.345+: #<STD/RT:TEST BQN :FN BQN-TEST827575 :ARGS NIL :PERSIST NIL {1005F9FB73}>.
8.346+: 1 unexpected failures:
8.347+: #<FAIL ARITHMETIC ERROR FLOATING-POINT-INVALID-OPERATION SIGNALLED>.
8.348+* emacs
8.349 There are a few internal packages that link to system libraries at
8.350 runtime - the following libraries need to be installed for a fully
8.351 functioning editor: