[functional-tests] Fix bug when a pattern matches to tests.
This commit is contained in:
parent
db9259d303
commit
3eadbaf433
@ -93,7 +93,8 @@
|
|||||||
(fmt #t (cat (fn keys) nl))
|
(fmt #t (cat (fn keys) nl))
|
||||||
(flush))
|
(flush))
|
||||||
|
|
||||||
(for-each describe (cons '() (reverse (cdr (reverse keys)))) keys))
|
(unless (null? keys)
|
||||||
|
(for-each describe (cons '() (reverse (cdr (reverse keys)))) keys)))
|
||||||
|
|
||||||
(define (describe-scenarios keys)
|
(define (describe-scenarios keys)
|
||||||
(fmt-scenarios keys
|
(fmt-scenarios keys
|
||||||
|
Loading…
Reference in New Issue
Block a user