anchor.diff:           {help, $H, "help", boolean, "Show this message"}
           ]).
   
  --define(sort_opt_spec,   [{sort, $s, "sort", undefined, "Determine to sort results instead of streaming list keys"}]).
  +-define(sort_opt_spec,   [{sort, $s, "sort", {boolean, false}, "Sort the results"}]).
   -define(bucket_opt_spec, [{bucket, undefined, undefined, string, "bucket name"}]).
   -define(object_opt_spec, [{object, undefined, undefined, string, "object name"}]).
   
  
positive.code:             [{1, {tombstone, tombstone}}]
      end.
  
  %% Other utilities
  
  pp(Atom, Value) ->
  
negative.code: %% - key streaming instead of key listing, or use 2i streaming to keep result sorted
  
  -export([main/1]).
  -export([print_object/3, list_blocks/4]).
  -export([rec_pp_fun/2]).
  
  -mode(compile).
  