From 28344040541957b181792917890e5c3a4e625260 Mon Sep 17 00:00:00 2001
From: alisdair sullivan <alisdairsullivan@yahoo.ca>
Date: Fri, 25 Jun 2010 03:02:12 -0700
Subject: [PATCH] removed extra clause from jsx_test.escript, slight
 modifications so it works with prove

---
 priv/jsx_test.escript | 19 +++++--------------
 1 file changed, 5 insertions(+), 14 deletions(-)

diff --git a/priv/jsx_test.escript b/priv/jsx_test.escript
index 3c33779..69bd8e4 100755
--- a/priv/jsx_test.escript
+++ b/priv/jsx_test.escript
@@ -24,29 +24,22 @@
 
 -mode(compile).
 
+main([]) ->
+    test("./test/cases");
+
 main([Path]) ->
     test(Path).
 
 
 test(Dir) ->
 	code:add_path("ebin"),
-	code:load_file(jsx),
-	code:load_file(jsx_utf8),
-	code:load_file(jsx_utf16),
-	code:load_file(jsx_utf16le),
-	code:load_file(jsx_utf32),
-	code:load_file(jsx_utf32le),
 
     ValidJSONTests = load_tests(Dir),
     
-    etap:plan(length(ValidJSONTests) * 5),
-    Before = erlang:now(),
+    etap:plan((length(ValidJSONTests) * 10) + 1),
     run_tests(ValidJSONTests),
     etap:is(multi_decode(multi_json_body(), []), multi_test_result(), "multi terms"),
-    After = erlang:now(),
-    etap:end_tests(),
-    
-    io:format("Elapsed Time:  ~p~n", [timer:now_diff(After, Before)]).
+    etap:end_tests().
 
 
 load_tests(Dir) ->
@@ -109,8 +102,6 @@ incremental_decode_loop({incomplete, _Next, Force}, <<>>, Acc) ->
 	end;
 incremental_decode_loop({event, end_json, Next}, Rest, Acc) ->
     incremental_decode_loop(Next(), Rest, lists:reverse(Acc));
-incremental_decode_loop({event, end_json, _Next}, <<>>, Acc) ->
-    lists:reverse(Acc);
 incremental_decode_loop({event, Event, Next}, Rest, Acc) ->
 	incremental_decode_loop(Next(), Rest, [Event] ++ Acc).