[functional-tests] give all temporary files sensible names.
This makes it much easier when debugging a test.
This commit is contained in:
@@ -28,7 +28,8 @@
|
||||
(apply fmt #f (map dsp (intersperse " " cmd-and-args))))
|
||||
|
||||
(define (run . cmd-and-args)
|
||||
(with-temp-file (stdout-file stderr-file)
|
||||
(with-temp-file ((stdout-file "stdout")
|
||||
(stderr-file "stderr"))
|
||||
(let* ((short-cmd (build-command-line cmd-and-args))
|
||||
(cmd (fmt #f (dsp (build-command-line cmd-and-args))
|
||||
(dsp " > ")
|
||||
|
||||
Reference in New Issue
Block a user