Function PPRINT-DISPATCH
pprint-dispatch object
&optional
table => function, found-p
object - オブジェクト
table - pprint
ディスパッチテーブルか、nil
。 デフォルトは*print-pprint-dispatch*
の値。
function - 関数指定子
found-p - generalized-boolean
tableの中から、objectにマッチする型指定子と関連づけられた 優先度の高い関数を検索します。 その関数は、tableの中のobjectにマッチする全ての型指定子から検索され、 それらの型指定子の中に関連づいた最も高い優先度の関数が選択されます。 もし最も高い優先度の関数がひとつではなく複数あったとき、 任意のものが選ばれます。 もし型指定子がobjectにマッチしなかったときは、 objectが出力されるときに使われるprint-object
の関数が返却されます。
第二返却値のfound-pは、 もし型指定子がtableにマッチされたときはtrueを、 それ以外はfalseを返却します。
もしtableがnil
のとき、 pprint
ディスパッチテーブルの初期値から検索が行われます。
なし。
なし。
tableの状態
tableがpprint
ディスパッチテーブルでもnil
でもないときは、 型type-error
のエラーが通知されるべきです。
なし。
let ((*print-pretty* t))
(write object :stream s))
(funcall (pprint-dispatch object) s object) == (