Function RESTART-NAME

UP


Function RESTART-NAME

Function RESTART-NAME

構文

restart-name restart => name

引数と戻り値

restart - restart
name - シンボル

定義

restartの名前を返却しますが、 もしrestartが名前を持っていなかったときは、 nilが返却されます。

例文

(restart-case 
    (loop for restart in (compute-restarts)
              collect (restart-name restart))
  (case1 () :report "Return 1." 1)
  (nil   () :report "Return 2." 2)
  (case3 () :report "Return 3." 3)
  (case1 () :report "Return 4." 4))
=>  (CASE1 NIL CASE3 CASE1 ABORT)
;; 上記の例はABORTという名前のrestartを明に作成していませんが
;; しかし暗黙的にシステムによって提供されます。

副作用

なし。

影響

なし。

例外

なし。

参考

compute-restarts, find-restart

備考

なし。


TOP, Github