changeset 394: |
a866723aac84 |
parent 393: |
6b87df03cdaf |
child 395: |
d876b572b5b9 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Sat, 01 Jun 2024 19:16:02 -0400 |
files: |
lisp/ffi/zstd/tests.lisp lisp/lib/box/box.asd lisp/lib/box/pkg.lisp lisp/lib/box/qmp.lisp |
description: |
init qmp |
1.1--- a/lisp/ffi/zstd/tests.lisp Sat Jun 01 17:36:57 2024 -0400
1.2+++ b/lisp/ffi/zstd/tests.lisp Sat Jun 01 19:16:02 2024 -0400
1.3@@ -1,8 +1,16 @@
1.4+;;; zstd/tests.lisp --- Zstd FFI tests
1.5+
1.6+;;
1.7+
1.8+;;; Code:
1.9 (defpackage :zstd/tests
1.10- (:use :cl :rt :zstd))
1.11+ (:use :cl :std :rt :zstd))
1.12+
1.13 (in-package :zstd/tests)
1.14+
1.15 (defsuite :zstd)
1.16 (in-suite :zstd)
1.17+
1.18 (load-zstd)
1.19
1.20 (deftest sanity ()
1.21@@ -33,6 +41,3 @@
1.22 (is (= 0 (zstd::zstd-iserror ret)))
1.23 (zstd::zstd-compressstream cst out in)
1.24 (is (= 0 (zstd::zstd-compressstream2 cst out in 0)))))
1.25-
1.26-
1.27-
2.1--- a/lisp/lib/box/box.asd Sat Jun 01 17:36:57 2024 -0400
2.2+++ b/lisp/lib/box/box.asd Sat Jun 01 19:16:02 2024 -0400
2.3@@ -1,7 +1,9 @@
2.4 (defsystem :box
2.5 :description "Kernel virtualization support for Lisp - wraps QEMU,archiso,etc."
2.6 :depends-on (:std :cli :obj :dat :net :log)
2.7- :components ((:file "pkg"))
2.8+ :components ((:file "pkg")
2.9+ (:file "archiso")
2.10+ (:file "qmp"))
2.11 :in-order-to ((test-op (test-op :box/tests))))
2.12
2.13 (defsystem :box/tests
3.1--- a/lisp/lib/box/pkg.lisp Sat Jun 01 17:36:57 2024 -0400
3.2+++ b/lisp/lib/box/pkg.lisp Sat Jun 01 19:16:02 2024 -0400
3.3@@ -20,3 +20,8 @@
3.4 (:nicknames :archiso)
3.5 (:use :cl :std :cli/shell :dat/json :obj/cfg)
3.6 (:export :*archiso-config* :*archiso-creds*))
3.7+
3.8+(defpackage :box/qmp
3.9+ (:nicknames :qmp)
3.10+ (:use :cl :std :dat/json :net/sans-io)
3.11+ (:export :*archiso-config* :*archiso-creds*))
4.1--- /dev/null Thu Jan 01 00:00:00 1970 +0000
4.2+++ b/lisp/lib/box/qmp.lisp Sat Jun 01 19:16:02 2024 -0400
4.3@@ -0,0 +1,6 @@
4.4+;;; box/qmp.lisp --- QEMU Monitor Protocol
4.5+
4.6+;;
4.7+
4.8+;;; Code:
4.9+(in-package :box/qmp)