From c973abd1b2de841d495c3023fa800e9e3e1f0466 Mon Sep 17 00:00:00 2001
From: alisdair sullivan <alisdairsullivan@yahoo.ca>
Date: Mon, 28 Feb 2011 12:28:06 -0800
Subject: [PATCH] json_to_term/2 now returns {incomplete, More} when input ends
 prematurely rather than an error tuple when called with the option {stream,
 true}

---
 doc/_layouts/default.html | 0
 src/jsx_eep0018.erl       | 6 +++++-
 2 files changed, 5 insertions(+), 1 deletion(-)
 create mode 100644 doc/_layouts/default.html

diff --git a/doc/_layouts/default.html b/doc/_layouts/default.html
new file mode 100644
index 0000000..e69de29
diff --git a/src/jsx_eep0018.erl b/src/jsx_eep0018.erl
index ae98602..18a21ac 100644
--- a/src/jsx_eep0018.erl
+++ b/src/jsx_eep0018.erl
@@ -128,7 +128,11 @@ collect({event, Event, Next}, [Key, Current|Rest], Opts) ->
 collect({incomplete, More}, [[]], Opts) ->
     case More(end_stream) of
         {event, Event, _Next} -> event(Event, Opts)
-        ; _ -> erlang:error(badarg)
+        ; _ -> 
+            case proplists:get_value(stream, Opts, false) of
+                true -> {incomplete, More}
+                ; false -> erlang:error(badarg)
+            end
     end;
 %% any other event is an error
 collect(_, _, _) -> erlang:error(badarg).