anchor.diff:            FeederFun = list_to_atom(FunString ++ "_feeder"),
             case lists:member({FeederFun, Arity}, FunList) of
                 true ->
  -                  ct:pal("Testing with feeder ~p:~p/~p~n",
  +                  ct:pal("Testing with feeder ~p:~p/~p",
                            [Module, Fun, Arity]),
                     [Res1 , test(Module, Fun, Arity, Count, [{threads, 1}, with_feeder])];
                 false -> Res1
  
positive.code:     ErrList = [ case lists:member(X, ExpFuncs) of
                      true -> true;
                      false ->
                          ct:pal("Excluded non exported function ~p:~p~n", [Module,X]),
                          false
                  end ||
                    X <- ExcludeList ],
  
negative.code:                   case lists:member({TestedFun, Arity}, FunList) of
                        true -> ok;
                        false ->
                            ct:pal("Found feeder, but no target fun ~p:~p/~p",
                                   [Module, TestedFun, Arity]),
                            throw(error)
                    end;
  