anchor.diff:  	#pdu{type         = Type, 
   	     error_status = Err,
   	     error_index  = Idx} when ExpVBs =:= any -> 
  -	    io:format("EXPECT received expected pdu (1)~n", []),
  +	    io_format_expect("received expected pdu (1)"),
   	    ok;
   
   	#pdu{type         = Type, 
   	     request_id   = ReqId, 
   	     error_status = Err2,
   	     error_index  = Idx} when ExpVBs =:= any -> 
  -	    io:format("EXPECT received expected pdu with "
  -		      "unexpected error status (2): "
  -		      "~n   Error Status: ~p~n", [Err2]),
  +	    io_format_expect("received expected pdu with "
  +                             "unexpected error status (2): "
  +                             "~n   Error Status: ~p", [Err2]),
   	    {error, {unexpected_error_status, Err, Err2, ReqId}};
   
   	#pdu{error_status = Err} when (Type   =:= any) andalso 
   				      (Idx    =:= any) andalso 
   				      (ExpVBs =:= any) -> 
  -	    io:format("EXPECT received expected pdu (3)~n", []),
  +	    io_format_expect("received expected pdu (3)"),
   	    ok;
   
   	#pdu{request_id   = ReqId, 
   	     error_status = Err2} when (Type   =:= any) andalso 
   				       (Idx    =:= any) andalso 
   				       (ExpVBs =:= any) -> 
  -	    io:format("EXPECT received expected pdu with "
  -		      "unexpected error status (4): "
  -		      "~n   Error Status: ~p~n", [Err2]),
  +	    io_format_expect("received expected pdu with "
  +                             "unexpected error status (4): "
  +                             "~n   Error Status: ~p", [Err2]),
   	    {error, {unexpected_error_status, Err, Err2, ReqId}};
   
   	#pdu{type         = Type, 
   	     error_status = Err} when (Idx =:= any) andalso 
   				      (ExpVBs =:= any) -> 
  -	    io:format("EXPECT received expected pdu (5)~n", []),
  +	    io_format_expect("received expected pdu (5)", []),
   	    ok;
   
   	#pdu{type         = Type, 
   	     request_id   = ReqId, 
   	     error_status = Err2} when (Idx =:= any) andalso 
   				       (ExpVBs =:= any) -> 
  -	    io:format("EXPECT received expected pdu with "
  -		      "unexpected error status (6): "
  -		      "~n   Error Status: ~p~n", [Err2]),
  +	    io_format_expect("received expected pdu with "
  +                             "unexpected error status (6): "
  +                             "~n   Error Status: ~p", [Err2]),
   	    {error, {unexpected_error_status, Err, Err2, ReqId}};
   
   	#pdu{type         = Type, 
  
positive.code: %% ExpVBs         -> exp_varbinds() | {VbsCondition, exp_varbinds()}
  do_expect(ExpVBs) ->
      Check = fun(_, R) -> R end,
      io:format("EXPECT 'get-response'"
  	      "~n   with"
  	      "~n      Varbinds: ~p~n", [ExpVBs]),
      do_expect2(Check, 'get-response', noError, 0, ExpVBs, get_timeout()).
  
  
  do_expect(v2trap, ExpVBs) ->
      Check = fun(_, R) -> R end,
      io:format("EXPECT 'snmpv2-trap'"
  	      "~n   with"
  	      "~n      Varbinds: ~p~n", [ExpVBs]),
      do_expect2(Check, 'snmpv2-trap', noError, 0, ExpVBs, get_timeout());
  
  
  do_expect(report, ExpVBs) ->
      Check = fun(_, R) -> R end,
      io:format("EXPECT 'report'"
  	      "~n   with"
  	      "~n      Varbinds: ~p~n", [ExpVBs]),
      do_expect2(Check, 'report', noError, 0, ExpVBs, get_timeout());
  
  
  
negative.code: 	     error_index  = EI} when is_list(Idx) andalso (ExpVBs =:= any) -> 
  	    case lists:member(EI, Idx) of
  		true ->
  		    io_format_expect("received expected pdu with "
                                       "unexpected error status (9): "
                                       "~n   Error Status: ~p", [Err2]),
  		    {error, {unexpected_error_status, Err, Err2, ReqId}};
  		false ->
  		    io_format_expect("received expected pdu with "
                                       "unexpected error (10): "
                                       "~n   Error Status: ~p"
                                       "~n   Error index:  ~p", [Err2, EI]),
  		    {error, {unexpected_error, {Err, Idx}, {Err2, EI}, ReqId}}
  	    end;
  
  