Function

Package

system

Syntax

call-system-showing-output cmd &key shell-type prefix show-cmd output-stream wait => status

Arguments

cmd

A string or a list of strings.

shell-type

A string.

prefix

A string.

show-cmd

A boolean.

output-stream

A symbol.

wait

A boolean.

Values

status

The exit status of the invoked shell.

Description

call-system-showing-output is an extension to call-system which allows output to be redirected to places other than the shell process from which the LispWorks image was invoked. call-system-showing-output therefore allows the user to, for example, invoke a shell command and redirect the output to the current Listener window.

If command is a string it is the command to execute. If it is a list, the first element of the list is the command and the remaining elements of the list are the command line arguments.

shell-type is a UNIX shell type. The default is "/bin/csh" .

prefix is a prefix to be printed at the start of any output line. The default value is "; " .

show-cmd specifies whether or not the cmd invoked will be printed as well as the output for that command. If t then cmd will be printed. The default value for show-cmd is t .

output-stream specifies where the output will be sent to. The default value is *standard-output* .

If wait is true, call-system-showing-output does not return until the process has exited. If nil , call-system-showing-output returns immediately and no output is shown. The default for wait is t .

call-system-showing-output returns the exit status of the shell invoked to execute the command.

Examples

CL-USER 1 > (sys:call-system-showing-output "pwd" :prefix "***")

***pwd

***/amd/xanfs1-cam/u/ldisk/sp/lispsrc/v42/builds

0

CL-USER 2 > (sys:call-system-showing-output "pwd" :prefix "&&&" :show-cmd nil)

&&&/amd/xanfs1-cam/u/ldisk/sp/lispsrc/v42/builds

0

See Also

call-system
open-pipe