anchor.diff:  util_alloc() ->
       alloc(?UTIL_ALLOCATORS).
   
  -%% Get the erlang:memory part of a snapshot
  -mem() ->
  -    {Mem,_Allocs} = snapshot_get_int(),
  -    Mem.
  -mem(Type) ->
  -    orddict:fetch(Type,mem()).
  -
   key2pos(current) ->
       ?CURRENT_POS;
   key2pos(max) ->
  
positive.code: %%%  <dd>Single block carrier threshold</dd>
  %%% </dl>
  %%%
  %%% All sizes returned by this module are in bytes.
  %%%
  -module(recon_alloc).
  -define(UTIL_ALLOCATORS, [temp_alloc,
  
negative.code:     {_libc,_Vsn,Allocators,_Opts} = erlang:system_info(allocator),
      %% versions is deleted in order to allow the use of the orddict api,
      %% and never really having come across a case where it was useful to know.
      [{{A,N},lists:sort(proplists:delete(versions,Props))} ||
          A <- Allocators,
          {_,N,Props} <- erlang:system_info({allocator,A})].
  
  