Chibi still wants to run tests in pwd in case we're running snow-tests from the chibi build dir.

This commit is contained in:
Alex Shinn 2015-04-23 18:32:15 +09:00
parent ef86d2ff65
commit 9b328359b5

View file

@ -1235,7 +1235,9 @@
;; stray output in the pwd, can be useful for accessing data
;; files during testing, and is needed for chicken (see chicken
;; trac #736).
(or (match (with-directory
;; For chibi we run from the current directory anyway for the
;; sake of running snow-tests from an uninstalled chibi-scheme.
(or (match ((if (eq? impl 'chibi) (lambda (dir f) (f)) with-directory)
dir
(lambda () (process->output+error+status command)))
((output error status)