Function MERGE-PATHNAMES

merge-pathnames pathname &optional default-pathname default-version
=> merged-pathname

引数と戻り値

pathname - パス名指定子
default-pathname - パス名指定子。デフォルトは*default-pathname-defaults*の値。
default-version - 有効なパス名のバージョン。デフォルトは:newest。
merged-pathname - パス名

定義

pathnameの指定されていない要素について対応するdefault-pathnameとdefault-versionから情報を埋めることでパス名を生成します。

パス名の要素のデフォルトは、他のパス名から取得された要素を埋めることによって行われます。これは特に、入力ファイルと出力ファイルがあるプログラムのような場合において便利です。出力パス名の指定されていない要素は入力パス名から指定されますが、例外としてタイプだけは入力パス名のタイプをデフォルトとして使用するのではなく、そのプログラムの出力にあったタイプをデフォルトとして使用するべきです。例えば、compile-file-pathnameをご確認ください。

もしバージョンが指定されていない場合は、 default-versionが使用されます。もしdefault-versionがnilのときは、そのバージョンの要素は変更されません。

もしpathnameが明にホストを指定しており、かつデバイスを指定していないとき、さらにdefault-pathnameのホストの要素が pathnameのホストの要素と一致しているときは、 default-pathnameからデバイスを取得します。その他の場合は、デバイスはそのホストのデフォルトのファイルデバイスが使用されます。もしpathnameが、ホスト、デバイス、ディレクトリ、名前、タイプを指定しなかったとき、それぞれの要素はdefault-pathnameからコピーされます。もしpathnameが名前を指定せず、バージョンが指定されなかったとき、そのバージョンはちょうど他の要素と同じように、 default-pathnameから指定されます。もしpathnameが名前を指定していたときは、バージョンはdefault-pathnameによる影響はありません。もしこの処理でバージョンが欠落したときは、 default-versionが使用されます。もしホストのファイル名の構文が、名前かタイプなしにバージョンの入力方法があったとき、 default-pathnameに違ったバージョンが提供されたとしてもユーザーは名前とタイプをデフォルトのものに指定できます。

もしpathnameがストリームのとき、 pathnameは効率よく(pathname pathname)の値が使用されます。 merge-pathnamesはストリームが開いているか閉じているかのどちらでも使用することができます。

もしpathnameが開いているファイルで使われている名前で表現されているとき、それはおそらく、しかし必須ではありませんが、実際のファイルの名前です。

default-pathnameが論理パス名のときか、あるいは名前文字列が定義された論理ホスト名と続けてコロンで始まっているとき、 merge-pathnamesは論理パス名の名前文字列として識別します。これらの二例のうち最初の方では、論理パス名の名前文字列のホストの位置とそれに続くコロンはオプションです。

もし最初の引数が論理パス名であるか、最初の引数が明確にホストが指定された論理パス名の名前文字列であるか、あるいは最初の引数ではホストが指定されていないものの default-pathnameが論理パス名であるときのみ、 merge-pathnamesは論理パス名を返却します。

pathnameのマージは、相対ディレクトリを特別に扱います。もし(pathname-directory pathname)の返却が、 car部:relativeのリストであり、かつ(pathname-directory default-pathname)がリストであるときは、マージされたディレクトリは次の値で示されます。

(append (pathname-directory default-pathname)
        (cdr  ;最初の要素から:relativeを取り除く
          (pathname-directory pathname)))

ただし例外があり、もし結果のリストの中に対して、文字列か:wildのどちらかが存在しているすぐあとに:backが続いているときは、その両方が削除されます。 :backキーワードが複数あるときは、可能な限り何度でも繰り返して削除されます。もし(pathname-directory default-pathname)がリストではないか、あるいは(pathname-directory pathname)が car部:relativeのリストではないときは、マージされたディレクトリは (or (pathname-directory pathname) (pathname-directory default-pathname)) になります。

merge-pathnamesは pathnameの慣習的な大文字小文字の表現を、出力するパス名の慣習的な大文字小文字の表現に対応させます。

例文

(merge-pathnames "CMUC::FORMAT"
                 "CMUC::PS:<LISPIO>.FASL")
=>  #P"CMUC::PS:<LISPIO>FORMAT.FASL.0"

影響

例外

参考

備考

この正味の効果は、もしちょうど名前だけが与えられたとき、ホスト、デバイス、ディレクトリ、そしてタイプは default-pathnameのものが使用されますが、バージョンはdefault-versionが使用されるというものです。もしそれが無く、ただディレクトリだけが与えられたとき、名前、タイプ、そしてバージョンは default-pathnameのものが一緒に使用されます。