Gauche > Archives > 2012/05/11

2012/05/11 01:35:50 UTC(び)

Testing io ...                                                   failed.
discrepancies found.  Errors are:
test port-map, side-effecting: expects ((#\a 1) (#\b 2) (#\c 3)) => got ((#\a 2) (#\b 3) (#\c 3))

わたしんとこだけかしら

2012/05/11 01:48:09 UTCshiro

んー、OSは?

2012/05/11 01:49:27 UTC(び)

test port-map, side-effecting, expects ((#\a 1) (#\b 2) (#\c 3)) ==> ERROR: GOT ((#\a 2) (#\b 3) (#\c 3))

Mac OS X 10.7.4とFreeBSD 8.2Rですね

HEADです

2012/05/11 01:50:03 UTCshiro

あ、HEADはport-mapいじってる。何かしくったかな

2012/05/11 01:51:03 UTC(び)

副作用のない方のテストは通ってます

2012/05/11 01:51:53 UTCshiro

generator-mapの定義がおかしかった。引数の評価順に依存してら。

2012/05/11 01:56:06 UTCshiro

diff --git a/lib/gauche/procedure.scm b/lib/gauche/procedure.scm
index 28139ad..8fa22a0 100644
--- a/lib/gauche/procedure.scm
+++ b/lib/gauche/procedure.scm
@@ -306,7 +306,8 @@
     (let loop ([item (gen)] [r '()])
       (if (eof-object? item)
         (reverse r)
-        (loop (gen) (cons (fn item) r))))
+        (let1 r (cons (fn item) r)
+          (loop (gen) r))))
     (let1 gens (cons gen more)
       (let loop ([r '()])
         (let1 items (%generate-values gens)

これでどうかな。

2012/05/11 02:01:18 UTC(び)

直りました。

2012/05/11 04:49:24 UTCnatsutan

Gauche9.3(mingw版、Ubuntu 12.04 LTS 32bit)でGauche-Tk動きました。明日Kyoto.lispで発表してきます。

2012/05/11 07:44:27 UTCshiro

「0.9.3をリリースしたらここを書き換える」というようなコメントがあるんだが何をどう変えるつもりだったのかさっぱり思い出せない…

2012/05/11 08:18:13 UTCとおる。

あれ MacOS 10.7.4 っていうのが出てたんですか。いま MacOS 10.7.3、Xcode 4.3.2、Command Line Tools for Xcode Late March 2012 の組み合わせでビルド＆テスト通過しました。この間 LLVM で問題が出ていたのとは違うマシンですが、開発環境は同じはず。

2012/05/11 08:29:33 UTCとおる。

Ubuntu 12.04 LTS 64-bit でもうごきました。

2012/05/11 18:22:09 UTCshiro

utf-8以外のエンコーディングでconfigureするとdoc/のビルドに失敗するので、修正した0.9.3.2を出しました。utf-8でコンパイルするぶんには急いでアップデートしなくてもいいでしょう。

<< 2012/05/10

Back to the chat room

2012/05/12 >>