anchor.diff:  strings(Strings) -> strings(Strings, []).
   strings([], Out) -> Out;
   strings([{space,  N,      S} | Ss], Out) -> strings(Ss, Out ++ term2string(term2string("~~~ws", [N]), [S]));
  +strings([{left,   N,      S} | Ss], Out) -> strings(Ss, Out ++ term2string(term2string(" ~~s~~~ws", [N]), [S,""]));
   strings([{format, Format, S} | Ss], Out) -> strings(Ss, Out ++ term2string(Format, [S]));
   strings([S|Ss], Out) -> strings(Ss, Out ++ term2string("~ts", [S])).
   
  
positive.code: 	{time, W}      -> [{space,  W, s(L#print.time) } | format_lock(L, Opts)];
  	duration       -> [{space, 20, s(L#print.dtr)  } | format_lock(L, Opts)];
  	{duration, W}  -> [{space,  W, s(L#print.dtr)  } | format_lock(L, Opts)];
  	histogram      -> [{space,  0, s(L#print.hist) } | format_lock(L, Opts)];
  	{histogram, W} -> [{space,  W, s(L#print.hist) } | format_lock(L, Opts)];
  	_              ->                                  format_lock(L, Opts)
      end.
  
  print_state_information(#state{locks = Locks} = State) ->
  
negative.code: 			{thresholds, [{tries, -1}, {colls, -1}, {time, -1}]}], Opts),
  		Prints = locks2print([L], Duration),
  		print_lock_information(Prints, proplists:get_value(print, Opts1)),
  		print_full_histogram(SumStats#stats.hist)
  	end, Combos),
  
      {reply, ok, State};
  