Function

Summary

Print each file of a system to a printer.

Package

lispworks

Signature

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

Arguments

system-name

A symbol representing the name of the system. The system must have been defined using the defsystem macro.

simulate

If nil or not present 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, using y-or-n-p , if you want the plan to be carried out.

:each -- hardcopy-system displays each action in the plan one at a time, and asks you if you want to carry out this particular action. The answer executes the rest of the plan without further prompting, e returns from hardcopy-system without further processing, and y and n work as expected.

Values

hardcopy-system returns nil .

Examples

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

Notes

By default, hardcopy-system uses *print-command* as the command sent to the shell.

See also

defsystem

*print-command*