Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

31 lines (21 sloc) 0.657 kb
#|
these tests are both very unixy
|#
(in-package #:trivial-shell-test)
(deftestsuite trivial-shell-test ()
())
(addtest (trivial-shell-test)
test-1
(ensure-same (parse-integer (shell-command "expr 1 + 1") :junk-allowed t) 2))
(addtest (trivial-shell-test)
test-input
(ensure-same (parse-integer
(shell-command "wc -c" :input "hello")
:junk-allowed t)
5 :test '=))
(deftestsuite spaces-in-command (trivial-shell-test)
()
(:documentation "https://github.com/gwkkwg/trivial-shell/issues/1"))
(addtest (spaces-in-command)
test-1
(ensure-same (parse-integer (shell-command "tests/a\\ b\\ c.sh 56") :junk-allowed t) 56))
Jump to Line
Something went wrong with that request. Please try again.