make-condition

(make-condition type &key initargs...)

指定した型のコンディションオブジェクト(スロットを initarg から埋めた CLOS サブセットインスタンス。未指定スロットは :initform を取ります)を構築します。型はリテラルのクォートされたシンボルでなければなりません。define-condition で定義されていない(かつ simple-error などの組み込みでもない)型は、引数をそのまま持つ raw なタグ付きインスタンスになります。インスタンスは error/signal(コンディションオブジェクト designator)に渡せ、typecase でテストできます。

> (error (make-condition 'simple-error :format-control "something failed"))
Error: something failed