anchor.diff:                      Any ->
                           ct:pal("Failed: Stacktrace ~p~n",
                                  [erlang:get_stacktrace()]),
  -                        ?ct_fail("~p evaluated to \"~p\" which is "
  -                               "not the expected ~p that evaluates to \"~p\"",
  +                        ?ct_fail("~s evaluated to \"~w\" which is "
  +                               "not the expected ~s that evaluates to \"~w\"",
                                  [??Actual, Any, ??Expected, ExpectedVal])
                   end
           end()).
  
positive.code:                     Any ->
                          ct:pal("Failed: Stacktrace ~p~n",
                                 [erlang:get_stacktrace()]),
                          ?ct_fail("~p evaluated to \"~p\" which is "
                                 "not the expected ~p~n"
                                 "(~p)",
                                 [??Actual, Any, ??ExpectedPattern, lists:flatten(Note)])
                  end
          end()).
  
negative.code:                     Any ->
                          ct:pal("Failed: Stacktrace ~p~n",
                                 [erlang:get_stacktrace()]),
                          ?ct_fail("~s evaluated to \"~w\" which is "
                                 "not the expected ~s",
                                 [??Actual, Any, ??ExpectedPattern])
                  end
          end()).
  