anchor.diff:                  true
           end,
       io_lib_pretty:print(V, ([{column, I}, {line_length, columns()},
  -                             {depth, ?LINEMAX}, {max_chars, ?CHAR_MAX},
  +                             {depth, D}, {max_chars, ?CHAR_MAX},
                                {strings, Strings},
                                {record_print_fun, record_print_fun(RT)}]
  -                            ++ Enc)).
  +                            ++ enc())).
   
   columns() ->
       case io:columns() of
  
positive.code:     {value,list_records(record_defs(RT, listify(Recs))),Bs};
  local_func(rp, [A], Bs0, _Shell, RT, Lf, Ef) ->
      {[V],Bs} = expr_list([A], Bs0, Lf, Ef),
      Cs = io_lib_pretty:print(V, ([{column, 1},
                                    {line_length, columns()},
                                    {depth, -1},
                                    {max_chars, ?CHAR_MAX},
                                    {record_print_fun, record_print_fun(RT)}]
                                   ++ enc())),
      io:requests([{put_chars, unicode, Cs}, nl]),
      {value,ok,Bs};
  local_func(rr, [A], Bs0, _Shell, RT, Lf, Ef) ->
  
negative.code:     {History, erlang:min(Results, History)}.
  
  pp(V, I, RT) ->
      pp(V, I, _Depth=?LINEMAX, RT).
  
  pp(V, I, D, RT) ->
      Strings =
          case application:get_env(stdlib, shell_strings) of
              {ok, false} ->
  