anchor.diff:                | {min_heap_size, Size :: non_neg_integer()}
                 | {min_bin_vheap_size, VSize :: non_neg_integer()},
         Level :: low | normal | high.
  -spawn_opt(F, O) when is_function(F) ->
  +spawn_opt(F, O) when erlang:is_function(F) ->
       spawn_opt(erlang, apply, [F, []], O);
  -spawn_opt({M,F}=MF, O) when is_atom(M), is_atom(F) ->
  +spawn_opt({M,F}=MF, O) when erlang:is_atom(M), erlang:is_atom(F) ->
       spawn_opt(erlang, apply, [MF, []], O);
   spawn_opt({M,F,A}, O) -> % For (undocumented) backward compatibility
       spawn_opt(M, F, A, O);
  
positive.code:     badarg.
  
  list_to_integer([D|L], Base, I) 
    when is_integer(D), D >= $0, D =< $9, D < Base+$0 ->
      list_to_integer(L, Base, I*Base + D-$0);
  list_to_integer([D|L], Base, I) 
    when is_integer(D), D >= $A, D < Base+$A-10 ->
      list_to_integer(L, Base, I*Base + D-$A+10);
  list_to_integer([D|L], Base, I) 
    when is_integer(D), D >= $a, D < Base+$a-10 ->
      list_to_integer(L, Base, I*Base + D-$a+10);
  list_to_integer([], _, I) ->
      I;
  
negative.code:     [{cput_i2e_tag(Lvl, TM), cput_i2e(rvrs(SameV), true, Lvl+1, TM)}
       | cput_i2e(Is, false, Lvl, TM)].
  
  cput_i2e_tag_map() -> erlang:list_to_tuple([cpu | record_info(fields, cpu)]).
  
  cput_i2e_tag(Lvl, TM) ->
      case erlang:element(Lvl, TM) of processor_node -> node; Other -> Other end.
  
  rvrs([_] = L) -> L;
  rvrs(Xs) -> rvrs(Xs, []).
  