anchor.diff:          Is4 = move_allocates(Is3),
           Is5 = beam_utils:live_opt(Is4),
           Is6 = opt_blocks(Is5),
  -        Is = beam_utils:delete_live_annos(Is6),
  +        Is7 = beam_utils:delete_live_annos(Is6),
  +        Is = opt_allocs(Is7),
   
           %% Done.
           {function,Name,Arity,CLabel,Is}
  
positive.code: opt_blocks([]) -> [].
  
  opt_block(Is0) ->
      Is = find_fixpoint(fun(Is) ->
  			       opt_tuple_element(opt(Is))
  		       end, Is0),
      opt_alloc(Is).
  
  find_fixpoint(OptFun, Is0) ->
      case OptFun(Is0) of
  
negative.code: -module(beam_block).
  
  -export([module/2]).
  -import(lists, [reverse/1,reverse/2,member/2]).
  
  -spec module(beam_utils:module_code(), [compile:option()]) ->
                      {'ok',beam_utils:module_code()}.
  