hardcopy-system

hardcopy-system Function

Summary

Prints each file of a system to a printer.

Package

lispworks

Signature

hardcopy-system system-name &key command simulate => nil

Arguments

`system-name`⇩	A symbol or string.
`command`⇩	A string.
`simulate`⇩	One of `nil`, `t`, `:ask` or `:each`.

Description

The function hardcopy-system prints each file of a system to a printer.

system-name must be a symbol or string representing the name of the system. The system must have been defined already using the defsystem macro.

Each file is printed by sending command to a shell. command defaults to the value of *print-command*.

If simulate is nil (the default) then hardcopy-system works silently. Otherwise a plan of the actions which hardcopy-system intends to carry out is printed. What happens next depends on the value of simulate:

`t`	Do nothing.
`:ask`	You are asked if you wish the plan to be carried out using y-or-n-p.
`:each`	`hardcopy-system` displays each action in the plan one at a time, and asks you whether you want to carry out this particular action. The answer `c` executes the rest of the plan without further prompting, `e` returns from `hardcopy-system` without further processing, and `y` and `n` work as expected. `:simulate` may be abbreviated as `:sim`.

Examples

(hardcopy-system 'blackboard)

(hardcopy-system 'tms :simulate :ask :command "lpr")