[functional-tests] add a couple of tests
This commit is contained in:
parent
3c761e6822
commit
4e1b7f89ee
@ -133,6 +133,13 @@
|
||||
(cache-restore "-i" xml "-o" md "--debug-override-metadata-version" "12345")
|
||||
(run-fail "cache_check" md))))
|
||||
|
||||
(define-scenario (cache-check dont-repair-xml)
|
||||
"Fails gracefully if run on XML rather than metadata"
|
||||
(with-cache-xml (xml)
|
||||
(with-empty-metadata (md)
|
||||
(receive (_ stderr) (run-fail "cache_check " xml)
|
||||
#t))))
|
||||
|
||||
;;;-----------------------------------------------------------
|
||||
;;; cache_restore scenarios
|
||||
;;;-----------------------------------------------------------
|
||||
|
@ -260,6 +260,12 @@
|
||||
(with-valid-metadata (md)
|
||||
(thin-rmap "--region 1..23 --region 45..78" md)))
|
||||
|
||||
(define-scenario (thin-rmap handles-junk-input)
|
||||
"Fail gracefully if given nonsense"
|
||||
(with-thin-xml (xml)
|
||||
(receive (_ stderr) (run-fail "thin_rmap --region 0..-1" xml)
|
||||
#t)))
|
||||
|
||||
;;;-----------------------------------------------------------
|
||||
;;; thin_delta scenarios
|
||||
;;;-----------------------------------------------------------
|
||||
|
Loading…
Reference in New Issue
Block a user