anchor.diff:  	{colls, R#print.colls},
   	{ratio, R#print.cr},
   	{time, R#print.time},
  -	{duration, R#print.dtr}],
  +	{duration, R#print.dtr},
  +	{histogram, R#print.hist}
  +    ],
       % Prune offsets to only allow specified print options
       lists:foldr(fun
   	    ({Type, W}, Out) -> [{Type, W}|Out];
  
positive.code: 			    [] ->
  				ok;
  			    _  ->
  				%io:format("Combined ~p~n", [Combined]),
  				print("lock: " ++ term2string(Name)),
  				print("id:   " ++ IdString),
  				print("type: " ++ term2string(Type)),
  				Ps = stats2print(Combined, Duration),
  				Opts1 = options([{print, [entry, tries,colls,ratio,time,duration]},
  					{thresholds, [{tries, -1}, {colls, -1}, {time, -1}]}], Opts),
  				print_lock_information(filter_print(Ps, Opts1), proplists:get_value(print, Opts1))
  			end
  		   % (#lock{ name = Name, id = Id}) ->
  		%	io:format("Empty lock ~p ~p~n", [Name, Id])
  		end, Combos);
  	_ ->
  	    Print1 = locks2print(Combos, Duration),
  	    Print2 = filter_print(Print1, Opts),
  	    print_lock_information(Print2, proplists:get_value(print, Opts))
      end,
      {reply, ok, State};
  
  handle_call(raw, _From, #state{ locks = Locks} = State)->
  
negative.code: 		    ({print,print}, Out) -> [print|Out];
  		    ({Str, Len}, Out)    -> [erlang:min(erlang:max(length(s(Str))+1,Len),80)|Out]
  		end, [], lists:zip(tuple_to_list(L), tuple_to_list(Max)))))
  	end, #print{ id = 4, type = 5, entry = 5, name = 6, tries = 8, colls = 13, cr = 16, time = 11, dtr = 14, hist=20 },
  	Locks),
      % Setup the offsets for later pruning
      Offsets = [
  