anchor.diff:      MonitorRef = erlang:monitor(process, meck_util:proc_name(Mod)),
       receive {'DOWN', MonitorRef, _Type, _Object, _Info} -> ok end.
   
  --spec foldl_mocks(Fun, AccIn) -> AccOut when
  +-spec fold_mocks(Fun, AccIn) -> AccOut when
       Fun :: fun((Elem :: module(), AccIn) -> AccOut),
       AccIn :: term(),
       AccOut :: term().
  -foldl_mocks(Fun, Acc0) when is_function(Fun, 2) ->
  +fold_mocks(Fun, Acc0) when is_function(Fun, 2) ->
       lists:foldl(fun(Mod, Acc)  ->
           ModName = atom_to_list(Mod),
           case lists:split(max(length(ModName) - 5, 0), ModName) of
  
positive.code:       Unloaded :: [Mod],
        Mod :: atom().
  unload() ->
      foldl_mocks(fun(Mod, Acc) ->
          try
              unload(Mod),
              [Mod | Acc]
  
negative.code: %% @doc Returns the currently mocked modules.
  -spec mocked() -> list(atom()).
  mocked() ->
      fold_mocks(fun(M, Acc) -> [M | Acc] end, []).
  
  %%%============================================================================
  %%% Internal functions
  