Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
asdf
asdf
Commits
5e26bc2c
Commit
5e26bc2c
authored
Oct 15, 2013
by
Francois-Rene Rideau
Browse files
SBCL doesn't try hard enough on Windows.
parent
6043552a
Changes
1
Hide whitespace changes
Inline
Side-by-side
uiop/run-program.lisp
View file @
5e26bc2c
...
...
@@ -370,7 +370,7 @@ for the implementation's underlying run-program function"
via SLURP-INPUT-STREAM or VOMIT-OUTPUT-STREAM (return T),
or whether it's already taken care of by the implementation's underlying run-program."
(
not
(
typep
specifier
'
(
or
null
string
pathname
(
member
:interactive
:output
)
#+
(
or
cmu
sbcl
scl
)
(
or
stream
(
eql
t
))
#+
(
or
cmu
(
and
sbcl
os-unix
)
scl
)
(
or
stream
(
eql
t
))
#+
lispworks
file-stream
))))
;; not a type!? comm:socket-stream
(
defun
%normalize-io-specifier
(
specifier
&optional
role
)
...
...
@@ -630,7 +630,7 @@ It returns a process-info plist with possible keys:
(
typecase
activity-spec
((
or
null
string
pathname
(
eql
:interactive
))
(
easy-case
))
#+
(
or
cmu
sbcl
scl
)
;; streams are only easy on implementations that try very hard
#+
(
or
cmu
(
and
sbcl
os-unix
)
scl
)
;; streams are only easy on implementations that try very hard
(
stream
(
if
stream-easy-p
(
easy-case
)
(
hard-case
)))
(
t
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment