すぐ先の状態しかわからない状況におかれている。 いつ問い合わせがくるかどうかがわからない、ひどい状況だ。

ちょっと、リストを述語でわける関数を考えてみた。述語が真になるもののリストと、偽になるもののリストを多値で返してみよう。 そう考えたとき、シンプルな実装はこうなるだろう。 (defun divid-if (fn lst) (values (remove-if-not fn lst) (remove-if fn…