anchor.diff:  %%    code:load_file/1) and the atom `no_native' on failure.
   
   load_native_code(Mod, Bin) when is_atom(Mod), is_binary(Bin) ->
  +  erlang:system_flag(multi_scheduling, block),
  +  try
  +    load_native_code_nosmp(Mod, Bin)
  +  after
  +    erlang:system_flag(multi_scheduling, unblock)
  +  end.
  +
  +load_native_code_nosmp(Mod, Bin) ->
     Architecture = erlang:system_info(hipe_architecture),
     try chunk_name(Architecture) of
       ChunkTag ->
  
positive.code: -spec load(Mod, binary()) -> 'bad_crc' | {'module',Mod}
  			      when is_subtype(Mod,atom()).
  load(Mod, Bin) ->
    ?debug_msg("********* Loading funs in module ~w *********\n",[Mod]),
    %% Loading just some functions in a module; patch closures separately.
    put(hipe_patch_closures, true),
  
negative.code: -spec load_module(Mod, binary(), _) -> 'bad_crc' | {'module',Mod}
  	     				when is_subtype(Mod,atom()).
  load_module(Mod, Bin, Beam) ->
    erlang:system_flag(multi_scheduling, block),
    try
      load_module_nosmp(Mod, Bin, Beam)
    after
      erlang:system_flag(multi_scheduling, unblock)
    end.
  
  load_module_nosmp(Mod, Bin, Beam) ->
    load_module(Mod, Bin, Beam, []).
  
  load_module(Mod, Bin, Beam, OldReferencesToPatch) ->
  