diff options
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)))))) |