[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: converting between jisx0213 and into utf-8



なんどもすみません. 2点訂正(書いてあることの全部ですが)です.

>  ていうか, 仕様ですね. 上位のサブテーブルの t が優先なので,
> 
>    (let ((s (make-char-table 'safe-chars)))
> ==>  (aset s (make-char 'japanese-jisx0213-1) t)
>     (aset s (make-char 'japanese-jisx0213-1 33 33) nil)
>     (aref s (make-char 'japanese-jisx0213-1 33 33)))
> 
> 上の'==>'の部分をしないか, 
> 
> (aset s (make-char 'japanese-jisx0213-1 33 33)
> 
>  の前に

 後でも問題ありません.

> (aset s (make-char 'japanese-jisx0213-1) t)

(aset s (make-char 'japanese-jisx0213-1) nil)

>  をしなくてはならないということです.

-- 
ほりぐちきょうたろう@熱が...でない.