brought test suite up to date, fixed a dumb error that occured when parsing integers larger than 100

This commit is contained in:
alisdair sullivan 2010-06-21 23:06:55 -07:00
parent 34929a452e
commit 37f9d2a07a
8 changed files with 196 additions and 43 deletions

View file

@ -217,7 +217,7 @@ string(<<S/?encoding, Rest/binary>>, Stack, Opts, Acc) when ?is_noncontrol(S) ->
string(Bin, Stack, Opts, Acc) ->
case partial_utf(Bin) of
false -> {error, badjson}
; _ -> {incomplete, fun(Stream) -> string(<<Bin/binary, Stream/binary>>, Stack, Opts, Acc) end}
; _ -> {incomplete, fun(Stream) -> string(<<Bin/binary, Stream/binary>>, Stack, Opts, Acc) end, ?ferror}
end.
@ -436,7 +436,7 @@ integer(<<?solidus/?encoding, Rest/binary>>, Stack, ?comments_enabled(Opts), Acc
maybe_comment(Rest, fun(Resume) -> integer(Resume, Stack, Opts, Acc) end);
integer(<<>>, [], Opts, Acc) ->
{incomplete,
fun(Stream) -> zero(Stream, [], Opts, Acc) end,
fun(Stream) -> integer(Stream, [], Opts, Acc) end,
fun() -> {event, {integer, lists:reverse(Acc)}, fun() -> maybe_done(<<>>, [], Opts) end} end
};
integer(Bin, Stack, Opts, Acc) ->