tighten input/output of maybe_escape
This commit is contained in:
parent
ff170d5f4e
commit
fbd90e4df7
1 changed files with 8 additions and 4 deletions
|
@ -505,9 +505,9 @@ strip_continuations(<<X, Rest/binary>>, N) when X >= 128, X =< 191 ->
|
||||||
strip_continuations(Bin, _) -> Bin.
|
strip_continuations(Bin, _) -> Bin.
|
||||||
|
|
||||||
|
|
||||||
maybe_escape(String, #config{dirty_strings=true}) -> String;
|
maybe_escape(Escaped, #config{dirty_strings=true}) -> <<Escaped/utf8>>;
|
||||||
maybe_escape(String, #config{escaped_strings=true} = Config) -> escape(String, Config);
|
maybe_escape(Escaped, #config{escaped_strings=true} = Config) -> escape(Escaped, Config);
|
||||||
maybe_escape(String, _Config) -> String.
|
maybe_escape(Escaped, _Config) -> <<Escaped/utf8>>.
|
||||||
|
|
||||||
escape($\b, _) -> <<"\\b">>;
|
escape($\b, _) -> <<"\\b">>;
|
||||||
escape($\t, _) -> <<"\\t">>;
|
escape($\t, _) -> <<"\\t">>;
|
||||||
|
@ -774,6 +774,10 @@ escape_test_() ->
|
||||||
<<"\\b">>,
|
<<"\\b">>,
|
||||||
maybe_escape(16#0008, #config{escaped_strings=true})
|
maybe_escape(16#0008, #config{escaped_strings=true})
|
||||||
)},
|
)},
|
||||||
|
{"don't escape backspace", ?_assertEqual(
|
||||||
|
<<"\b">>,
|
||||||
|
maybe_escape(16#0008, #config{})
|
||||||
|
)},
|
||||||
{"maybe_escape tab", ?_assertEqual(
|
{"maybe_escape tab", ?_assertEqual(
|
||||||
<<"\\t">>,
|
<<"\\t">>,
|
||||||
maybe_escape(16#0009, #config{escaped_strings=true})
|
maybe_escape(16#0009, #config{escaped_strings=true})
|
||||||
|
@ -932,7 +936,7 @@ escape_test_() ->
|
||||||
)},
|
)},
|
||||||
{"dirty strings", ?_assertEqual(
|
{"dirty strings", ?_assertEqual(
|
||||||
<<0>>,
|
<<0>>,
|
||||||
maybe_escape(<<0>>, #config{escaped_strings=true, dirty_strings=true})
|
maybe_escape(16#0000, #config{escaped_strings=true, dirty_strings=true})
|
||||||
)}
|
)}
|
||||||
].
|
].
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue