anchor.diff:  put_fsm_proc(ReqId, #params{n = N, w = W, dw = DW}) ->
       AllowMult = true,
       ReturnBody = false,
  -    PutCore = riak_kv_put_core:init(N, W, DW, 
  +    PutCore = riak_kv_put_core:init(N, W, DW,
  +                                    DW, %% SLF hack
                                       N-W+1,   % cannot ever get W replies
                                       N-DW+1,  % cannot ever get DW replies
                                       AllowMult,
  -                                    ReturnBody),
  +                                    ReturnBody,
  +                                    [{Idx, primary} || Idx <- lists:seq(1, N)] %% SLF hack
  +),
       #proc{name = {put_fsm, ReqId}, handler = put_fsm, procst = #putfsmst{putcore = PutCore}}.
   
   put_fsm(#msg{from = From, c = {put, PL, Obj}},
  
positive.code:     NotFoundOk = true,
      AllowMult = true,
      DeletedVclock = true,
      GetCore = riak_kv_get_core:init(N, R, FailThreshold, NotFoundOk, 
                                      AllowMult, DeletedVclock),
      #proc{name = {get_fsm, ReqId}, handler = get_fsm,
            procst = #getfsmst{getcore = GetCore}}.
  
  
negative.code:         end
      catch
          What:Reason ->
              {What, {Reason, erlang:get_stacktrace()}, Next, S}
      end.
  
  status(#state{verbose = true} = S, Next) ->
  