# HG changeset patch # User wenzelm # Date 1513258057 -3600 # Node ID d49727160f0ad0a73fbcf28d4be5636ed35e844f # Parent 93600ca0c8d9d8a41e56c08f780f022111092975 tuned; diff -r 93600ca0c8d9 -r d49727160f0a src/Pure/System/bash.scala --- a/src/Pure/System/bash.scala Thu Dec 14 11:38:20 2017 +0100 +++ b/src/Pure/System/bash.scala Thu Dec 14 14:27:37 2017 +0100 @@ -24,7 +24,7 @@ case '\f' => "$'\\f'" case '\r' => "$'\\r'" case _ => - if (Symbol.is_ascii_letter(ch) || Symbol.is_ascii_digit(ch) || "+-./:_".contains(ch)) + if (Symbol.is_ascii_letter(ch) || Symbol.is_ascii_digit(ch) || "+,-./:_".contains(ch)) Symbol.ascii(ch) else if (c < 0) "$'\\x" + Integer.toHexString(256 + c) + "'" else if (c < 16) "$'\\x0" + Integer.toHexString(c) + "'" diff -r 93600ca0c8d9 -r d49727160f0a src/Pure/System/bash_syntax.ML --- a/src/Pure/System/bash_syntax.ML Thu Dec 14 11:38:20 2017 +0100 +++ b/src/Pure/System/bash_syntax.ML Thu Dec 14 14:27:37 2017 +0100 @@ -24,7 +24,7 @@ | "\r" => "$'\\r'" | _ => if Symbol.is_ascii_letter ch orelse Symbol.is_ascii_digit ch orelse - exists_string (fn c => c = ch) "+-./:_" then ch + exists_string (fn c => c = ch) "+,-./:_" then ch else if c < 16 then "$'\\x0" ^ Int.fmt StringCvt.HEX c ^ "'" else if c < 32 orelse c >= 127 then "$'\\x" ^ Int.fmt StringCvt.HEX c ^ "'" else "\\" ^ ch)