anchor.diff:  walk_body(Acc, [H|T]) ->
       walk_body([transform(H) | Acc], T).
   
  -transform({call, Line, {remote, _Line1,
  -                        {atom, _Line2, ale},
  -                        {atom, _Line3, Fn}},
  +transform({call, Line, {remote, _,
  +                        {atom, _, ale},
  +                        {atom, _, Fn}},
              [LoggerExpr]})
     when Fn =:= sync;
          Fn =:= get_effective_loglevel ->
  
positive.code:                         extended_loglevel_expr(LogLevelExpr)
                  end,
  
              emit_dynamic_logger_call(LoggerExpr, LogLevelExpr1, transform(Args),
                                       Line, Line1, Line2, Line3, Line4);
          false ->
              Stmt
      end;
  transform({call, Line, {remote, Line1,
                          {atom, Line2, ale},
                          {atom, Line3, LogLevel}},
             [Arg | Args]} = Stmt) ->
      case valid_loglevel(LogLevel) andalso
          valid_args(extended_loglevel(LogLevel), Args) of
          true ->
              case Arg of
                  {atom, Line4, LoggerName} ->
                      emit_logger_call(LoggerName, LogLevel, transform(Args),
                                       Line, Line1, Line2, Line3, Line4);
                  _Other ->
                      Stmt
              end;
  
negative.code:         false ->
              Stmt
      end;
  transform({call, Line, {remote, _,
                          {atom, _, ale},
                          {atom, _, LogFn}},
             [LoggerExpr, LogLevelExpr | Args]} = Stmt)
    when LogFn =:= log; LogFn =:= xlog ->
      Extended = LogFn =:= xlog,
  