anchor.diff:  -spec bignum_sizeneed(non_neg_integer()) -> non_neg_integer().
   
   bignum_sizeneed(Size) ->
  -  WordSizeBits = hipe_rtl_arch:word_size() * 8,
     case is_fixnum(1 bsl Size) of
       true ->
         0;
       false ->
  +      WordSizeBits = hipe_rtl_arch:word_size() * 8,
         ((Size + (WordSizeBits-1)) div WordSizeBits) + 1
     end.
   
  
positive.code: -spec is_fixnum(integer()) -> boolean().
  is_fixnum(N) when is_integer(N) ->
    Bits = ?bytes_to_bits(hipe_rtl_arch:word_size()) - ?TAG_IMMED1_SIZE,
    (N =< ((1 bsl (Bits - 1)) - 1)) and (N >= -(1 bsl (Bits - 1))).
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  
negative.code: %%========================================================================
  %%
  %% Filename : hipe_tagscheme.erl
  %% Note     : This is specific to Erlang >= 5.* (i.e. starting with R9).
  %%
  %% Modifications:
  %%  020904: Happi - added support for external pids and ports.
  