APEL version

[Keiichi Suzuki]

>>>>> apel-ja の No. 00087
>>>>> Message-Id: <ubt93vzgk.fsf ＠ kei.nanap.org> で、
>>>>> "圭一" == 私は書きました。

圭一> ;; 「やりすぎ」という意見もありそうなのと、コンパイル時の動作を完
圭一> ;; 全に理解していませんので、コードは書いていません。 ^^;;;;

;; とは書いたものの...

>>>>> apel-ja の No. 00095
>>>>> Message-Id: <86wvrqtzep.fsf ＠ aqua.ocn.ne.jp> で、
>>>>> "小林" == Shuhei KOBAYASHI <shuhei ＠ aqua.ocn.ne.jp>さま曰く...

小林> 私はしばらくこちらの作業を進めるつもりですので, product.el の改良は他
小林> の方にお願いしたいです.
小林> ;; 名指しのような気もしますが(^^;, 第 3 の実装者が出てきてもいいで
小林> ;; すし.

;; 出てきていただけなさそうなので、突き進んでいきます。 :-)

SEMI-API の実装には現在、 SEMI / WEMI / AKEMI / EMIKO 等があります。その
実装名を取り出すためにはこのような方法が良いのではないかと思い、実装して
みました。

ある product を指定すると、それに対応する実装名を取得できます。実装であ
るか、そうでないかは、その product に含まれる feature があるかどうかで判
断します。

(product-define "SEMI-API" nil '(1 13))
(product-define "SEMI" "SEMI-API" '(1 13 7) "Awazu")
(product-provide 'mime-edit "SEMI")
(product-string "SEMI-API" t)
"SEMI/1.13.7 (Awazu)"

また、 emacs のバージョンに関する定義も次のような方法で行なうことになり
ます。

(product-define "Meadow" "emacs" '(1 11 1) "TSUYU")
(product-provide 'Meadow "Meadow")
(product-define "MULE" "Meadow" '(4 1) "AOI")
(product-provide 'mule "MULE")
(product-define "Emacs" "Meadow" '(20 4) system-configuration)
(product-provide 'emacs "Emacs")

(product-string "emacs" t)
"Meadow/1.11.1 (TSUYU) Emacs/20.4 (i386-*-nt4.0.1381) MULE/4.1 (AOI)"

メイルでやり取りするのもなんですので、 chamonix の CVS に apel-pruduct 
という枝をつくって、そこに入れておきました。

-- 
鈴木圭一 / keiichi ＠ nanap.org
PGP finger print (DH/DSS)
0B32 B37E 6DE9 3BC1 68A4  4089 7AAF 2B03 ECBD 614B