umgeher/jsx
0
Fork 0
Code Issues Pull requests Activity

adds tests for naked terms

Browse source
This commit is contained in:
alisdair sullivan 2011-11-28 17:22:54 -08:00
parent c9b590735e
commit 6a81f7885b
1 changed files with 8 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/jsx_terms.erl
View file

@ -185,5 +185,13 @@ atom_term() ->
[[{}], [{}]],
[{key, []}, {'another key', [{}]}]
].
naked_test_() ->
[
{"naked integer", ?_assert(to_term(<<"123">>, []) =:= 123)},
{"naked float", ?_assert(to_term(<<"-4.32e-17">>, []) =:= -4.32e-17)},
{"naked literal", ?_assert(to_term(<<"true">>, []) =:= true)},
{"naked string", ?_assert(to_term(<<"\"string\"">>, []) =:= <<"string">>)}
].
-endif.