Code aggregation and add missing tests.

Author: soranoba

src/bbmustache.erl

@@ -287,11 +287,7 @@ compile_impl([{'#', Keys, Tags, Source} | T], Data, Result, State) ->
       _ when is_list(Value) ->
             compile_impl(T, Data, lists:foldl(fun(X, Acc) -> compile_impl(Tags, X, Acc, NestedState) end,
                                              Result, Value), State);
-      _ when Value =:= false ->
-            compile_impl(T, Data, Result, State);
-      _ when Value =:= nil ->
-            compile_impl(T, Data, Result, State);
-      _ when Value =:= <<"">> ->
+      _ when Value =:= false; Value =:= nil; Value =:= <<"">> ->
             compile_impl(T, Data, Result, State);
       _ when is_function(Value, 2) ->
             Ret = Value(Source, fun(Text) -> render(Text, Data, State#?MODULE.options) end),
@@ -301,7 +297,7 @@ compile_impl([{'#', Keys, Tags, Source} | T], Data, Result, State) ->
     end;
 compile_impl([{'^', Keys, Tags} | T], Data, Result, State) ->
     Value = get_data_recursive(Keys, Data, false, State),
-    case Value =:= [] orelse Value =:= false orelse Value =:= nil orelse Value =:= "" of
+    case Value =:= [] orelse Value =:= false orelse Value =:= nil orelse Value =:= <<"">> of
         true  -> compile_impl(T, Data, compile_impl(Tags, Data, Result, State), State);
         false -> compile_impl(T, Data, Result, State)
     end;

test/bbmustache_tests.erl

@@ -215,23 +215,23 @@ context_stack_test_() ->
       ?_assertEqual(<<"">>,
                     bbmustache:render(<<"{{#parent}}aaa{{parent.child}}bbb{{/parent}}">>,
                                       [{"parent", []}],
-                                      [raise_on_context_miss]))},
-     {"It hides content in # tag that is specified as \"\"",
-      ?_assertEqual(<<"">>,
-                    bbmustache:render(<<"{{#content}}hello world{{/content}}">>,
-                                      [{"content", ""}]))},
-     {"It hides content in # tag that is specified as \"\"",
-      ?_assertEqual(<<"">>,
-                    bbmustache:render(<<"{{#content}}hello world{{/content}}">>,
-                                      [{"content", nil}]))},
-     {"It shows content in ^ tag that is specified as \"\"",
-      ?_assertEqual(<<"hello world">>,
-                    bbmustache:render(<<"{{^content}}hello world{{/content}}">>,
-                                      [{"content", ""}]))},
-     {"It shows content in ^ tag that is specified as \"\"",
-      ?_assertEqual(<<"hello world">>,
-                    bbmustache:render(<<"{{^content}}hello world{{/content}}">>,
-                                      [{"content", nil}]))}
+                                      [raise_on_context_miss]))}
+    ].
+
+shows_or_hides_content_test_() ->
+    [
+     {"It hides content in # tag that is specified as empty list, empty binary, nil or false",
+      fun() ->
+        lists:foreach(fun(X) ->
+          ?assertEqual(<<"">>, bbmustache:render(<<"{{#content}}hello world{{/content}}">>, [{"content", X}]))
+        end, ["", <<"">>, nil, false])
+      end},
+     {"It show content in ^ tag that is specified as empty list, empty binary, nil or false",
+      fun() ->
+        lists:foreach(fun(X) ->
+          ?assertEqual(<<"hello world">>, bbmustache:render(<<"{{^content}}hello world{{/content}}">>, [{"content", X}]))
+        end, ["", <<"">>, nil, false])
+      end}
     ].
 
 escape_fun_test_() ->