3 # tests related to SB-EXT:RUN-PROGRAM
5 sbcl --noinform --noprint --sysinit /dev/null --userinit /dev/null <<EOF
6 (let ((string (with-output-to-string (stream)
7 (sb-ext:run-program "/bin/echo"
10 (when (string= string "foo bar
12 (sb-ext:quit :unix-status 52)))
23 # (SB-EXT:RUN-PROGRAM "echo" NIL)
24 # => error in function SB-IMPL::%ENUMERATE-SEARCH-LIST:
25 # Undefined search list: path
27 # (SB-EXT:RUN-PROGRAM "/bin/uname" '("-a") :OUTPUT :STREAM)
28 # doesn't return a STREAM (the way doc string claims)