anchor.diff:    clj_module().
   add_functions(_, ?NIL) -> error(badarg);
   add_functions(Funs, ModuleName) when is_atom(ModuleName)  ->
  -  add_functions(Funs, clj_utils:ets_get(?MODULE, ModuleName));
  +  add_functions(Funs, fetch_module(ModuleName));
   add_functions(Funs, Module) ->
     SaveFun = fun(F) ->
                   FunctionId  = function_id(F),
  
positive.code:     {Pid, Modules}  ->
        clj_utils:ets_save(?PID_TO_MODULES, {Pid, [Module | Modules]})
    end,
  
    {reply, ok, State}.
  
  handle_cast({fake_module, Module, FakeModule}, State) ->
    {_, FakeModules} = clj_utils:ets_get( ?MODULE_TO_FAKE_MODULES
  
negative.code:                ) -> clj_module().
  add_alias(AliasSym, AliasedNsSym, ModuleName) when is_atom(ModuleName)  ->
    ok = ensure_loaded(<<?NO_SOURCE>>, ModuleName),
    add_alias(AliasSym, AliasedNsSym, fetch_module(ModuleName));
  add_alias(AliasSym, AliasedNsSym, Module) ->
    K = clj_rt:name(AliasSym),
    clj_utils:ets_save(Module#module.aliases, {K, AliasedNsSym}),
  