diff options
author | 2010-08-10 15:55:43 -0400 | |
---|---|---|
committer | 2010-08-10 15:55:43 -0400 | |
commit | 9a0ebd92b408b5d3a986348e4ce226c48eff820d (patch) | |
tree | 407556eab027f66694f1ddc3a0d4c1813e1b120f /src/jscomp.sml | |
parent | 576949f00da484e776a75be16a45f5f39038ed21 (diff) |
Better UTF-8 escaping for JavaScript and SQL literals
Diffstat (limited to 'src/jscomp.sml')
-rw-r--r-- | src/jscomp.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/jscomp.sml b/src/jscomp.sml index 4b04194c..f97725eb 100644 --- a/src/jscomp.sml +++ b/src/jscomp.sml @@ -435,7 +435,7 @@ fun process file = | #"\r" => "\\r" | #"\t" => "\\t" | ch => - if Char.isPrint ch then + if Char.isPrint ch orelse ord ch >= 128 then String.str ch else "\\" ^ padWith (#"0", |