anchor.diff:          , to_lower/1
           , escape_regex/1
           , maybe_json_string/1
  +        , run_result_to_mochijson3/1
           ]).
   
   %%%_* API ==============================================================
  
positive.code:       my_float_to_list(X, Decimals1)
    end.
  
  %%%_* Emacs ============================================================
  %%% Local Variables:
  %%% allout-layout: t
  
negative.code: insert_escape_quotes(Str) when is_list(Str) ->
    "\"" ++ Str ++ "\"".
  
  run_result_to_mochijson3({error, Reason, Details}) ->
    {struct, [ {error, true}
             , {reason, Reason}
             , {details, list_to_binary(io_lib:format("~p", [Details]))}
             ]};
  run_result_to_mochijson3({ PassOrFail
                     , ScenarioFilename
                     , Params
                     , FinalParams
                     , TransactionResults0
                     }) ->
    TransactionResults = lists:map( fun transaction_result_to_mochijson3/1
                                  , TransactionResults0
                                  ),
    {struct, [ {status, PassOrFail}
             , {scenario, list_to_binary(ScenarioFilename)}
             , {params, {struct, proplist_to_mochijson3(Params)}}
             , {final_params, {struct, proplist_to_mochijson3(FinalParams)}}
             , {transaction_results, TransactionResults}
             ]}.
  
  %%%_* Internal =========================================================
  
  