anchor.diff:  stop(Status) when is_list(Status) ->
       case is_bytelist(Status) of
           true ->
  -            stop_1(limit_halt_string(Status));
  +            stop_1(Status);
           false ->
               erlang:error(badarg)
       end;
  
positive.code:     "".
  
  halt_string(String, List) ->
      limit_halt_string(String ++ things_to_string(List)).
  
  limit_halt_string(String) when length(String) < ?MAX_HALT_STRING_SIZE ->
      String;
  limit_halt_string(String) ->
      lists:sublist(String, ?MAX_HALT_STRING_SIZE-1).
  
  %% String = string()
  %% List = [string() | atom() | pid() | number()]
  
negative.code: 
  -define(ON_LOAD_HANDLER, init__boot__on_load_handler).
  
  
  debug(false, _) -> ok;
  debug(_, T)     -> erlang:display(T).
  