io.launcher.windows: escape char.

locals-and-roots
Doug Coleman 2016-06-20 14:33:24 -07:00
parent 80d8b17eaa
commit cf80591ecb
1 changed files with 1 additions and 1 deletions

View File

@ -64,7 +64,7 @@ TUPLE: CreateProcess-args
[
{ [ drop char: \ = ] [ nip "\\\"" member? ] } 2&&
] monotonic-split [
dup last char: " = [
dup last char: \" = [
dup length 1 > [
! String of backslashes + double-quote
length 1 - 2 * char: \ <repetition> "\\\"" append