Skip to content
GitLab
Explore
Sign in
Register
Primary navigation
Search or go to…
Project
I
inferior-shell
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Wiki
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Model registry
Operate
Environments
Monitor
Incidents
Service Desk
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Terms and privacy
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
qitab
inferior-shell
Commits
6880f454
Commit
6880f454
authored
12 years ago
by
Francois-Rene Rideau
Browse files
Options
Downloads
Patches
Plain Diff
run-program/ is now run-program!
parent
da30c0d4
No related branches found
No related tags found
No related merge requests found
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
README
+3
-3
3 additions, 3 deletions
README
inferior-shell.asd
+1
-1
1 addition, 1 deletion
inferior-shell.asd
process-spec.lisp
+1
-1
1 addition, 1 deletion
process-spec.lisp
run.lisp
+2
-2
2 additions, 2 deletions
run.lisp
with
7 additions
and
7 deletions
README
+
3
−
3
View file @
6880f454
...
@@ -35,7 +35,7 @@ Example use of inferior-shell, from the rpm system:
...
@@ -35,7 +35,7 @@ Example use of inferior-shell, from the rpm system:
==== Limitations ====
==== Limitations ====
By default, inferior-shell uses
xcvb
-driver:run-program
/
By default, inferior-shell uses
asdf
-driver:run-program
as its universal execution backend, and has its limitations,
as its universal execution backend, and has its limitations,
which are as follows.
which are as follows.
...
@@ -113,7 +113,7 @@ RUN CMD &KEY ON-ERROR TIME SHOW HOST OUTPUT
...
@@ -113,7 +113,7 @@ RUN CMD &KEY ON-ERROR TIME SHOW HOST OUTPUT
but strips any line-ending at the end of the results,
but strips any line-ending at the end of the results,
just like a shell's `cmd` or $(cmd) would do,
just like a shell's `cmd` or $(cmd) would do,
more options are accepted and you can define your own, as per
more options are accepted and you can define your own, as per
xcvb
-driver's slurp-input-stream protocol.
asdf
-driver's slurp-input-stream protocol.
On Windows, RUN will not succeed for pipes, only for simple commands.
On Windows, RUN will not succeed for pipes, only for simple commands.
On Unix, simple commands on localhost are executed directly, but
On Unix, simple commands on localhost are executed directly, but
remote commands and pipes are executed by spawning a shell.
remote commands and pipes are executed by spawning a shell.
...
@@ -133,7 +133,7 @@ RUN/LINES CMD &KEY ON-ERROR TIME SHOW HOST
...
@@ -133,7 +133,7 @@ RUN/LINES CMD &KEY ON-ERROR TIME SHOW HOST
*BACKEND*
*BACKEND*
a variable to choose between backends. Currently, only supported are
a variable to choose between backends. Currently, only supported are
:AUTO (the default, using
xcvb
-driver:run-program
/
, and
:AUTO (the default, using
asdf
-driver:run-program, and
spawning a shell unless it's a simple process), and
spawning a shell unless it's a simple process), and
:SBCL (only available on #+(and sbcl sb-thread unix),
:SBCL (only available on #+(and sbcl sb-thread unix),
doesn't need a shell but has some limitations such as
doesn't need a shell but has some limitations such as
...
...
This diff is collapsed.
Click to expand it.
inferior-shell.asd
+
1
−
1
View file @
6880f454
...
@@ -3,7 +3,7 @@
...
@@ -3,7 +3,7 @@
(
defsystem
:inferior-shell
(
defsystem
:inferior-shell
:defsystem-depends-on
(
:asdf
:asdf-driver
)
:defsystem-depends-on
(
:asdf
:asdf-driver
)
:depends-on
(
:asdf-driver
:fare-utils
:alexandria
:fare-quasiquote-extras
:fare-mop
:depends-on
(
:asdf-driver
:fare-utils
:alexandria
:fare-quasiquote-extras
:fare-mop
:optima
#+
sbcl
:sb-posix
)
#+
sbcl
:sb-posix
)
:description
"spawn local or remote processes and shell pipes"
:description
"spawn local or remote processes and shell pipes"
:around-compile
"asdf-driver:call-with-safe-io-syntax"
:around-compile
"asdf-driver:call-with-safe-io-syntax"
...
...
This diff is collapsed.
Click to expand it.
process-spec.lisp
+
1
−
1
View file @
6880f454
#+
xcvb
(
module
(
:depends-on
(
"pkgdcl"
)))
#+
xcvb
(
module
(
:depends-on
(
"pkgdcl"
)))
(
in-package
:inferior-shell
)
(
cl:
in-package
:inferior-shell
)
(
in-readtable
:fare-quasiquote
)
(
in-readtable
:fare-quasiquote
)
...
...
This diff is collapsed.
Click to expand it.
run.lisp
+
2
−
2
View file @
6880f454
...
@@ -31,9 +31,9 @@
...
@@ -31,9 +31,9 @@
spec
))))
spec
))))
(
case
output
(
case
output
((
t
)
((
t
)
(
run-program
/
command
:ignore-error-status
ignore-error-status
))
(
run-program
command
:ignore-error-status
ignore-error-status
))
(
otherwise
(
otherwise
(
run-program
/
(
run-program
command
:ignore-error-status
ignore-error-status
:output
output
)))))
command
:ignore-error-status
ignore-error-status
:output
output
)))))
(
defun
run-process-spec
(
spec
&rest
keys
&key
ignore-error-status
output
host
backend
)
(
defun
run-process-spec
(
spec
&rest
keys
&key
ignore-error-status
output
host
backend
)
...
...
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
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!
Save comment
Cancel
Please
register
or
sign in
to comment