[functional-tests] print help if there's a bad command line
This commit is contained in:
parent
fe1f46ae07
commit
c2b5730d6b
@ -152,7 +152,9 @@
|
|||||||
list-command-line))
|
list-command-line))
|
||||||
|
|
||||||
(define (bad-command-line)
|
(define (bad-command-line)
|
||||||
(fmt (current-error-port) (dsp "bad command line\n")))
|
(fmt (current-error-port) (dsp "bad command line\n"))
|
||||||
|
(exec-help)
|
||||||
|
(exit 1))
|
||||||
|
|
||||||
;; (<string>) -> thunk
|
;; (<string>) -> thunk
|
||||||
(define (parse-command-line)
|
(define (parse-command-line)
|
||||||
|
Loading…
Reference in New Issue
Block a user