Commits

Sean Cribbs  committed 6a0a68c

Add pareto int key generators that strictly observe the MaxKey parameter.

  • Participants
  • Parent commits 081e8f9

Comments (0)

Files changed (1)

File src/basho_bench_keygen.erl

 new({pareto_int_bin, MaxKey}, _Id) ->
     Pareto = pareto(trunc(MaxKey * 0.2), ?PARETO_SHAPE),
     fun() -> <<(Pareto()):32/native>> end;
+new({truncated_pareto_int, MaxKey}, Id) ->
+    Pareto = new({pareto_int, MaxKey}, Id),
+    fun() -> erlang:min(MaxKey, Pareto()) end;
+new({truncated_pareto_int_bin, MaxKey}, Id) ->
+    TPareto = new({truncated_pareto_int, MaxKey}, Id),
+    fun() -> <<(TPareto()):32/native>> end;
 new({function, Module, Function, Args}, Id) ->
     case code:ensure_loaded(Module) of
         {module, Module} ->