CLCS
Function

copy-pprint-dispatch

copy-pprint-dispatch &optional table ⇒ new-table

Arguments and Values

tablea pprint dispatch table, or nil.
new-tablea fresh pprint dispatch table.

Description

Creates and returns a copy of the specified table, or of the value of *print-pprint-dispatch* if no table is specified, or of the initial value of *print-pprint-dispatch* if nil is specified.

Exceptional Situations

Should signal an error of type type-error if table is not a pprint dispatch table.