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.
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