anchor.diff:  
   debug_binary(Bin) ->
       io:format("Binary: ~s~n", [[ <<(X+$0)>> || <<X:1>> <= Bin]]).
  +
  +%%%===================================================================
  +%%% Debugging
  +%%%===================================================================
  +
  +environment() ->
  +    Apps = application:which_applications(),
  +    AppNames = [AppName || {AppName, _Desc, _Version} <- Apps],
  +    [{App, application:get_all_env(App)} || App <- AppNames].
  
positive.code: -export([trace_to_group_leader/0,dbgtc/1, dbgon/1, dbgon/2,
           dbgadd/1, dbgadd/2, dbgdel/1, dbgdel/2, dbgallp/0, dbgoff/0, dbgend/0,
           dbg_ip_trace/1]).
  
  -import(io, [format/1, format/2]).
  
  
negative.code: command_help(Command, Help, Usage) ->
      format("~-30s -- ~s. Usage: ~p~n", [Command, Help, Usage]).
  
  %%%===================================================================
  %%% General
  %%%===================================================================
  
  write_term(Path, Term) ->
      file:write_file(Path, io_lib:fwrite("~p.~n", [Term])).
  
  trace_to_group_leader() ->
      dbg:tracer(process, {fun(Msg, _) -> io:format("~p\n", [Msg]) end, []}).
  
  