Extra tests.

original commit: 341528065735f8390dbad87f49646580096a6a0d
This commit is contained in:
Vincent St-Amour 2013-04-19 14:21:04 -04:00
parent 1e8e959025
commit 20a01d0a03

View File

@ -20,6 +20,10 @@
(system* "/bin/echo" "zzz" #"foo" (string->path "/"))
(system/exit-code #"echo foo")
(system*/exit-code "/bin/echo" "zzz" #"foo" (string->path "/"))
(system #:set-pwd? #t #"echo foo")
(system* #:set-pwd? #t "/bin/echo" "zzz" #"foo" (string->path "/"))
(system/exit-code #:set-pwd? #t #"echo foo")
(system*/exit-code #:set-pwd? #t "/bin/echo" "zzz" #"foo" (string->path "/"))
(void))