-
- (test-mv '(("argv") (("c" . "val")) nil)
- (getopt '("argv" "-c" "val") '(("c" :optional))))
- (test-mv '(("argv" "v1") (("c" . "val")) nil)
- (getopt '("argv" "-c" "val" "v1") '(("c" :optional))))
- (test-mv '(( "v1") (("colon" . "val")) nil)
- (getopt '("--colon" "val" "v1") '(("colon" :optional))))
- (test-mv '(("ab" "-c") (("colon" . "val")) nil)
- (getopt '("ab" "--colon" "val" "--" "-c")
- '(("colon" :optional) ("-c" :none))))
- (test-mv '(("argv") (("c" . "cd")) nil)
- (getopt '("argv" "-c" "cd") '(("c" :required))))
- (test-mv '(("argv") nil ("c"))
- (getopt '("argv" "-c") '(("c" :required))))
- (test-mv '(("argv") (("c" . "10")) nil)
- (getopt '("argv" "-c=10") '(("c" :required))))
- (test-mv '(("argv") nil ("c"))
- (getopt '("argv" "-c=10") '(("c" :none))))
- (test-mv '(nil (("along" . "10")) nil)
- (getopt '("--along=10") '(("along" :optional))))
- (test-mv '(nil nil ("along"))
- (getopt '("--along=10") '(("along" :none))))
- (test-mv '(nil (("along" . "10")) nil)
- (getopt '("--a=10") '(("along" :optional))))
+
+ (test-mv '(("argv") (("c" . "val")) nil)
+ (getopt '("argv" "-c" "val") '(("c" :optional))))
+ (test-mv '(("argv" "v1") (("c" . "val")) nil)
+ (getopt '("argv" "-c" "val" "v1") '(("c" :optional))))
+ (test-mv '(( "v1") (("colon" . "val")) nil)
+ (getopt '("--colon" "val" "v1") '(("colon" :optional))))
+ (test-mv '(("ab" "-c") (("colon" . "val")) nil)
+ (getopt '("ab" "--colon" "val" "--" "-c")
+ '(("colon" :optional) ("-c" :none))))
+ (test-mv '(("argv") (("c" . "cd")) nil)
+ (getopt '("argv" "-c" "cd") '(("c" :required))))
+ (test-mv '(("argv") nil ("c"))
+ (getopt '("argv" "-c") '(("c" :required))))
+ (test-mv '(("argv") (("c" . "10")) nil)
+ (getopt '("argv" "-c=10") '(("c" :required))))
+ (test-mv '(("argv") nil ("c"))
+ (getopt '("argv" "-c=10") '(("c" :none))))
+ (test-mv '(nil (("along" . "10")) nil)
+ (getopt '("--along=10") '(("along" :optional))))
+ (test-mv '(nil nil ("along"))
+ (getopt '("--along=10") '(("along" :none))))
+ (test-mv '(nil (("along" . "10")) nil)
+ (getopt '("--a=10") '(("along" :optional))))