diff options
Diffstat (limited to 'tests/util.lisp')
| -rw-r--r-- | tests/util.lisp | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/util.lisp b/tests/util.lisp new file mode 100644 index 0000000..bffda68 --- /dev/null +++ b/tests/util.lisp @@ -0,0 +1,19 @@ +(in-package :consfigurator/tests) +(named-readtables:in-readtable :consfigurator) +(in-consfig "consfigurator/tests") + +(deftest version<.1 (version< "1.0.1" "1.0.2") t) + +(deftest version<=.1 (version<= "1.0.1" "1.0.2") t) + +(deftest version<.2 (version< "1.0.1" "1.0.1") nil) + +(deftest version<=.2 (version<= "1.0.1" "1.0.1") t) + +(deftest version<.3 (version< "1.1" "1.0.1") nil) + +(deftest version<=.3 (version<= "1.1" "1.0.1") nil) + +(deftest version<.4 (version< "1.a.1" "1.1") t) + +(deftest version<.5 (version< "1..1" "1.1") t) |