anchor.diff:            %% Silently drop it for modules that export it.
             Res1 = case lists:member(FA, FunsToTestNormally) of
                        true ->
  -                         ct:pal("Testing ~p:~p/~p~n", [Module, Fun, Arity]),
  +                         ct:pal("Testing ~p:~p/~p", [Module, Fun, Arity]),
                            test(Module, Fun, Arity, Count, [{threads, 1}]);
                        false -> skipped
                    end,
  
positive.code:                   case lists:member({TestedFun, Arity}, FunList) of
                        true -> ok;
                        false ->
                            ct:pal("Found feeder, but no target fun ~p:~p/~p~n",
                                   [Module, TestedFun, Arity]),
                            throw(error)
                    end;
  
negative.code:     ErrList = [ case lists:member(X, ExpFuncs) of
                      true -> true;
                      false ->
                          ct:pal("Excluded non exported function ~p:~p", [Module,X]),
                          false
                  end ||
                    X <- ExcludeList ],
  