mumurik/xyzzy — pull request #52 by xyzzy-17-638 (2012-05-09 12:30:38+00:00)
Title: fix: issue #35 - unittest/netinst-tests.lが通らない場合がある

### (1) `unittest/editor-tests.l`:`chdir-4`が失敗するのを修正

* `call-process`に直接 `"dir"` を渡しているのを `"%ComSpec% /c dir"` となるように修正
* ここでの `dir` の呼び出しは `call-process` の副作用を利用するためなので、`shell-command-line` 等を用いずに `call-process` のまま修正

### (2) `run-all-tests.bat` が環境に依存しているのを修正

バッチファイル内でのユニットテスト用 xyzzy の実行時に、`.xyzzy` を読み込んでいたのを修正

----
## [issue #35 - unittest/netinst-tests.lが通らない場合がある](https://bitbucket.org/mumurik/xyzzy/issue/35/unittest-netinst-testsl)

```

== 再現方法 ==
# 0.2.3.8RC1のソースを取得
# unittest/editor-tests.l:chdir-4 の "dir" は "cmd.exe /c dir" に書き換える
# 0.2.3.8RC1の状態でビルド
# run-all-tests.batを実行

== 期待する動作 ==
"ALL passed" が出力される

== 実際の動作 ==
エラーが起きる。エラー出力は以下のようになる
{{{
#!text
safe-data-read...Failed
;; ni::safe-data-read が read-time-eval のリーダーマクロを実行しないことを確認。
;; ni::load-site-data-file も同様の処理なのでこちらのテストは省略。
* (with-temp-files (file) (with-open-file (out file :direction :output :if-does-not-exist :create) (format out "#.(+ 1 1)~%")) (netinst::safe-data-read file))
Evaluation result (error):
Expected:
!! simple-error
Actually:
=> (2)
}}}

== 再現バージョン ==
* 0.2.3.8RC1

== 備考 ==
* {{{*scratch*}}} 等から {{{run-tests-from-file}}} で netinst-tests.l を実行した場合は正常にテストをパスする

* chdir-4について
** https://github.com/mumurik/xyzzy/pull/51
** http://twitter.com/#!/nayuri_aohime/status/199844326602309632
```