From cb39d33edac626128ed6b295fae6401712e9179e Mon Sep 17 00:00:00 2001
From: alisdair sullivan <alisdairsullivan@yahoo.ca>
Date: Wed, 23 May 2012 00:57:13 -0700
Subject: [PATCH] add incomplete test to jsx_parser

---
 src/jsx_parser.erl | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/src/jsx_parser.erl b/src/jsx_parser.erl
index 9146c67..d6b0ca2 100644
--- a/src/jsx_parser.erl
+++ b/src/jsx_parser.erl
@@ -555,6 +555,22 @@ maybe_replace(badutf, #opts{replaced_bad_utf8=true}) -> [16#fffd].
 -ifdef(TEST).
 -include_lib("eunit/include/eunit.hrl").
 
+
+incomplete_test_() ->
+    F = parser(jsx, [], []),
+    [
+        {"incomplete test", ?_assertEqual(
+            begin
+                {incomplete, A} = F(start_object),
+                {incomplete, B} = A(key),
+                {incomplete, C} = B(true),
+                {incomplete, D} = C(end_object),
+                D(end_json)
+            end,
+            [start_object, {key, <<"key">>}, {literal, true}, end_object, end_json]
+        )}
+    ].
+
 encode(Term) -> encode(Term, []).
 
 encode(Term, Opts) ->