X-Git-Url: http://git.kpe.io/?p=getopt.git;a=blobdiff_plain;f=tests.lisp;fp=tests.lisp;h=5790baaa35ab825d6f370ae279a3dffc97dc4291;hp=26b2c48df464759b1c5752bd90514186e635a473;hb=eef26086e56d5cc18542dd8a7c10bed4c4341b25;hpb=82c782eb6d4fdae0429d2c22e78129910d98dfb0 diff --git a/tests.lisp b/tests.lisp index 26b2c48..5790baa 100644 --- a/tests.lisp +++ b/tests.lisp @@ -66,5 +66,7 @@ (getopt '("--a=10") '(("along" :optional)))) (test-mv '(nil nil ("a")) (getopt '("--a=10") '(("along" :optional) ("aboot" :optional)))) + (test-mv '(("a") nil nil) + (getopt '("a") '(("a" :none)))) )) t)