umgeher/jsx
0
Fork 0
Code Issues Pull requests Activity

inline json escaping into encoder

Browse source
This commit is contained in:
alisdair sullivan 2012-03-31 01:24:06 -07:00
parent 7c31e9643e
commit 7c810cb05d
2 changed files with 406 additions and 90 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/jsx_utils.erl
View file

@ -25,7 +25,7 @@
-export([parse_opts/1]).
-export([extract_opts/1]).
-export([json_escape/2]).
-export([json_escape/2, json_escape_sequence/1]).
-include("jsx_opts.hrl").
@ -321,7 +321,7 @@ json_escape(Str, _, L, Len) when L =:= Len ->
%% convert a codepoint to it's \uXXXX equiv.
json_escape_sequence(X) ->
<<A:4, B:4, C:4, D:4>> = <<X:16>>,
unicode:characters_to_binary([$\\, $u, (to_hex(A)), (to_hex(B)), (to_hex(C)), (to_hex(D))]).
[$\\, $u, (to_hex(A)), (to_hex(B)), (to_hex(C)), (to_hex(D))].
to_hex(10) -> $a;