diff options
| author | Ben Sima <ben@bsima.me> | 2019-11-23 15:05:55 -0800 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2020-02-11 14:16:16 -0800 |
| commit | 7d38d7a8c15f9e8d61834b5fd05182addaf6c56e (patch) | |
| tree | 4fc5164871078abfe18f0ea629d9a10749c1f960 /Com/Simatime/Serval/Test.scm | |
| parent | 3a4ec55fedfc5e9243371dfc7a561ce762acee51 (diff) | |
Add serval
Diffstat (limited to 'Com/Simatime/Serval/Test.scm')
| -rw-r--r-- | Com/Simatime/Serval/Test.scm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/Com/Simatime/Serval/Test.scm b/Com/Simatime/Serval/Test.scm new file mode 100644 index 0000000..44e88c0 --- /dev/null +++ b/Com/Simatime/Serval/Test.scm @@ -0,0 +1,11 @@ +(define-module (Com Simatime Serval Test) + #:use-module (Com Simatime Serval) + #:use-module (Com Simatime core) + #:use-module (Com Simatime Test)) + +(comment + ;; TODO: make this a real test + (let ((kit (Kit "test-kit" "/nix/path" "/nix/config" + "123.456.0.0" 80 "127.0.0.1" #t))) + (testing "ser-deser are opposite functions" + (equal? kit (deserialize (serialize kit)))))) |