[xyzzy:08954] Re: リストから取得した要素について

[Yoshitaka Nishiguti <pocari@xxxxxxxxxxxxxxx>]

On Mon, 10 Nov 2003 22:20:26 +0900
Yoshitaka Nishiguti <pocari@xxxxxxxxxxxxxxx> wrote:


> のような処理を見て、
> 
> (setq full-path "d:/hoge/hoge.cpp")
> (case-ex ((pathname-type full-path) :test #'string-equal)
>   ("cpp" 'hoge)
>   ("c"   'boo)
>   ("h"   'piyo))
> hoge
> 
> みたいにできるかなーと思ったらできません。
> 調べたら、eqlで比較されちゃうんですね。
> 

あせって、間違いました。ここは、
(case (pathname-type full-path)
  ("cpp" 'hoge)
  ("c"   'boo)
  ("h"   'piyo))
です。