From 6150e4f135fdab479af31a93c2e8ae89d414c224 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 14 Mar 2014 02:24:35 -0700 Subject: * stream.c (run): Fix MinGW build failures. The run function doesn't work right with arguments, though: the win command line is broken. --- ChangeLog | 5 +++++ stream.c | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index e9dc9c2e..94667859 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2014-03-14 Kaz Kylheku + + * stream.c (run): Fix MinGW build failures. The run function doesn't + work right with arguments, though: the win command line is broken. + 2014-03-14 Kaz Kylheku * eval.c (eval_init): Make seed argument optional in make-random-state. diff --git a/stream.c b/stream.c index 1744c28c..14ec811b 100644 --- a/stream.c +++ b/stream.c @@ -2341,7 +2341,7 @@ static val run(val name, val args) #else static val run(val command, val args) { - val win_cmdline = win_make_cmdline(cons(name, args)); + val win_cmdline = win_make_cmdline(cons(command, default_bool_arg(args))); return sh(win_cmdline); } #endif -- cgit v1.2.3