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

[takeharu_yanagiura@xxxxxxxxxxxxxxxxx]

つるりんさん、こんちは
やなぎうらです。

ご自身でもお気づきのように、ここはかなり怪しいですね＾＾；

;;;;;;; 拡張子を変更
(defun change-extension (fullpath ext-src ext-dst)
  (substitute-string fullpath ext-src ext-dst)
)

substitute-string　は使わずに、

pathname-device pathname : デバイス名を返す
pathname-directory       : ディレクトリをリストに格納して返す
pathname-name            : ファイルの名前を返す
directory-namestring     : ディレクトリ部分を返す
file-namestring          : ファイル名部分を返す
merge-pathnames          : パスとファイル名を連結する
pathname-host            : ホスト名を返す

あたりを使われてはいかがでしょう。

余計なことかとおもいつつ・・・