fix case in restart test
svn: r3671
This commit is contained in:
parent
8b18795304
commit
aad04a274b
|
@ -16,9 +16,9 @@
|
||||||
(restart-mzscheme pre values post void)
|
(restart-mzscheme pre values post void)
|
||||||
(get-output-string s)))))])
|
(get-output-string s)))))])
|
||||||
(test-in-out #("ignore-me") #("-qm") "(current-command-line-arguments)" "#0()")
|
(test-in-out #("ignore-me") #("-qm") "(current-command-line-arguments)" "#0()")
|
||||||
(test-in-out #("") #("-qm") "'Hello" "hello")
|
(test-in-out #("") #("-qm") "'Hello" "Hello")
|
||||||
(test-in-out #("-g") #("-qm") "'Hello" "Hello")
|
(test-in-out #("-G") #("-qm") "'Hello" "hello")
|
||||||
(test-in-out #("") #("-qmg") "'Hello" "Hello"))
|
(test-in-out #("") #("-qmG") "'Hello" "hello"))
|
||||||
|
|
||||||
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user