Skip to content

Instantly share code, notes, and snippets.

@danielsdeleo

danielsdeleo/gist:404687

Forked from moonpolysoft/gist:404645
Created May 18, 2010 06:01
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save danielsdeleo/404687 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save danielsdeleo/404687 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. cliffmoon created this gist May 18, 2010.
    31 changes: 31 additions & 0 deletions gistfile1.hrl
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,31 @@
    -module(test_helper).

    -export([riak_test/1]).

    riak_test(Fun) ->
    start_riak(),
    {ok, Riak} = riak:local_client(),
    Ret = (catch Fun(Riak)),
    stop_riak(),
    case Ret of
    {'EXIT', Err} -> throw(Err);
    _ -> Ret
    end.

    start_riak() ->
    % Dir = "/tmp/ring-" ++ os:getpid(),
    % filelib:ensure_dir(Dir ++ "/"),
    % application:set_env(riak_core, ring_state_dir, Dir),
    application:set_env(riak_kv, storage_backend, riak_kv_cache_backend),
    load_and_start_apps([kernel, stdlib, sasl, crypto, webmachine,
    riak_core, riak_kv]).

    stop_riak() ->
    application:stop(riak_kv),
    application:stop(riak_core).

    load_and_start_apps([]) -> ok;
    load_and_start_apps([App|Tail]) ->
    application:load(App),
    application:start(App),
    load_and_start_apps(Tail).