anchor.diff:      test(false, Name, Setup, Assertion, Options).
   
   test_auto(Name, {Setup, Assertion}) ->
  -    test_auto(Name, Setup, Assertion).
  +    test_auto(Name, Setup, Assertion);
  +test_auto(Name, {Setup, Assertion, Options}) ->
  +    test_auto(Name, Setup, Assertion, Options).
   
   test_auto(Name, Setup, Assertion) ->
       test_auto(Name, Setup, Assertion, ?OPTS).
  
positive.code:     Pid ! {fail, Name, Reason}.
  
  test_manual(Name, {Setup, Assertion}) ->
      test_manual(Name, Setup, Assertion).
  
  test_manual(Name, Setup, Assertion) ->
      test_manual(Name, Setup, Assertion, ?OPTS).
  
negative.code:     end).
  
  test_event(Name) ->
      case wf:session({assertion, Name}) of
          undefined -> ok;
          Assert ->
              ?wf_assert(Name, Assert(), true)
      end.
  
  event({test_exec, Fun}) ->
      Fun();
  