integerの行列のリードが失敗する

[k-okada]

Yohei Kakiuchi が4年以上前に追加. 約4年前に更新.

ステータス: 新規 開始日: 2010/05/20
優先度: 高め 期日:
担当者: Yohei Kakiuchi 進捗 %:
0%
カテゴリ: - 作業時間の記録: -
対象バージョン: -
説明

整数のマトリックスを読み込むと変になります。

56.jskrbeusgl$ setq a #2i((0 0) (0 0))
;p=pointer?(0xbe69c10)
;p=pointer?(0xbe69bf8)

i(199662608 199662584)

57.jskrbeusgl$ a

i(199662608 199662584)

make-arrayで作ることはできます。
リードマクロの問題ではないかと推測されます。

59.jskrbeusgl$ setq b (make-array (list 2 2) :element-type :integer)

2i((0 0) (0 0))

60.jskrbeusgl$ b

2i((0 0) (0 0))

履歴
#1 Yohei Kakiuchi が約4年前に更新

Yohei Kakiuchi wrote:

整数のマトリックスを読み込むと変になります。 [...]

make-arrayで作ることはできます。 リードマクロの問題ではないかと推測されます。 [...]

lisp/l/array.l の 209行めread-integer-arrayがコメントアウトされている。
理由はあるでしょうか？ とりあえず使えるようですが。

(eval-when (load eval)
(set-dispatch-macro-character ## #\A 'read-array)
(set-dispatch-macro-character ## #\F 'read-float-array)
;(set-dispatch-macro-character ## #\I 'read-integer-array)
)