anchor.diff:  to_text(Head, Text) ->
      to_json(200, Head, Text).
   
  +to_text(Code, Head, {ok, Text}) ->
  +   to_text(Code, Head, Text);
  +
  +to_text(_, Head, {error, Reason}) ->
  +   to_error(Reason, Head);
  +
   to_text(Code, Head, Text) ->
      {ok,
         {Code, [{<<"Content-Type">>, <<"text/plain">>} | Head], scalar:s(Text)}
  
positive.code: 
  as_form(#request{entity = Entity}) ->
     restd_codec:decode_form(Entity).
  
  %%%----------------------------------------------------------------------------   
  %%%
  
negative.code: to_json(Head, Json) ->
     to_json(200, Head, Json).
  
  to_json(Code, Head, {ok, Json}) ->
     to_json(Code, Head, Json);
  
  to_json(_, Head, {error, Reason}) ->
     to_error(Reason, Head);
  
  to_json(Code, Head, Json) ->
     {ok,
        {Code, [{<<"Content-Type">>, <<"application/json">>} | Head], jsx:encode(Json)}
  