anchor.diff:  otp8563(doc) -> ["OTP-8563 - Counter64"];
   otp8563(Config) when is_list(Config) ->
       Val1 = 16#7fffffffffffffff,
  -    io:format("try encode and decode value 1: ~w (0x~.16b)~n", [Val1, Val1]),
  +    ?IPRINT("try encode and decode value 1: ~w (0x~.16b)", [Val1, Val1]),
       Enc1 = snmp_pdus:enc_value('Counter64', Val1), 
  -    io:format("  => ~w~n", [Enc1]),
  +    ?IPRINT("  => ~w", [Enc1]),
       {{'Counter64', Val1}, []} = snmp_pdus:dec_value(Enc1), 
   
       Val2 = Val1 + 1,
  -    io:format("try encode and decode value 2: ~w (0x~.16b)~n", [Val2, Val2]),
  +    ?IPRINT("try encode and decode value 2: ~w (0x~.16b)", [Val2, Val2]),
       Enc2 = snmp_pdus:enc_value('Counter64', Val2), 
  -    io:format("  => ~w~n", [Enc2]),
  +    ?IPRINT("  => ~w", [Enc2]),
       {{'Counter64', Val2}, []} = snmp_pdus:dec_value(Enc2), 
   
       Val3 = Val2 + 1,
  -    io:format("try encode and decode value 3: ~w (0x~.16b)~n", [Val3, Val3]),
  +    ?IPRINT("try encode and decode value 3: ~w (0x~.16b)", [Val3, Val3]),
       Enc3 = snmp_pdus:enc_value('Counter64', Val3), 
  -    io:format("  => ~w~n", [Enc3]),
  +    ?IPRINT("  => ~w", [Enc3]),
       {{'Counter64', Val3}, []} = snmp_pdus:dec_value(Enc3), 
   
       Val4 = 16#fffffffffffffffe,
  -    io:format("try encode and decode value 4: ~w (0x~.16b)~n", [Val4, Val4]),
  +    ?IPRINT("try encode and decode value 4: ~w (0x~.16b)", [Val4, Val4]),
       Enc4 = snmp_pdus:enc_value('Counter64', Val4), 
  -    io:format("  => ~w~n", [Enc4]),
  +    ?IPRINT("  => ~w", [Enc4]),
       {{'Counter64', Val4}, []} = snmp_pdus:dec_value(Enc4), 
   
       Val5 = Val4 + 1,
  -    io:format("try encode and decode value 5: ~w (0x~.16b)~n", [Val5, Val5]),
  +    ?IPRINT("try encode and decode value 5: ~w (0x~.16b)", [Val5, Val5]),
       Enc5 = snmp_pdus:enc_value('Counter64', Val5), 
  -    io:format("  => ~w~n", [Enc5]),
  +    ?IPRINT("  => ~w", [Enc5]),
       {{'Counter64', Val5}, []} = snmp_pdus:dec_value(Enc5), 
   
       Val6 = 16#ffffffffffffffff + 1, 
  -    io:format("try and fail to encode value 6: ~w (0x~.16b)~n", [Val6, Val6]),
  +    ?IPRINT("try and fail to encode value 6: ~w (0x~.16b)", [Val6, Val6]),
       case (catch snmp_pdus:enc_value('Counter64', Val6)) of
   	{'EXIT', {error, {bad_counter64, Val6}}} ->
   	    ok;
   	Unexpected6 ->
  -	    io:format("  => ~w~n", [Unexpected6]),
  +	    ?IPRINT("  => ~w", [Unexpected6]),
   	    exit({unexpected_encode_result, Unexpected6, Val6})
       end,
   
       Val7 = -1, 
  -    io:format("try and fail to encode value 7: ~w~n", [Val7]),
  +    ?IPRINT("try and fail to encode value 7: ~w", [Val7]),
       case (catch snmp_pdus:enc_value('Counter64', Val7)) of
   	{'EXIT', {error, {bad_counter64, Val7}}} ->
   	    ok;
   	Unexpected7 ->
  -	    io:format("  => ~w~n", [Unexpected7]),
  +	    ?IPRINT("  => ~w", [Unexpected7]),
   	    exit({unexpected_encode_result, Unexpected7, Val7})
       end,
   
  
positive.code: %% -----
  %%
  
  init_per_suite(Config) when is_list(Config) ->
      Config.
  
  end_per_suite(Config) when is_list(Config) ->
      Config.
  
  
  
  
negative.code: otp7575(suite) -> [];
  otp7575(doc) -> ["OTP-7575 - Message version"];
  otp7575(Config) when is_list(Config) ->
      ?IPRINT("attempt to decode message with valid version"),
      MsgWithOkVersion = <<48,39,2,1,0,4,6,112,117,98,108,105,99,160,26,2,2,1,49,2,1,0,2,1,0,48,14,48,12,6,8,43,6,1,2,1,1,5,0,5,0>>,
      case (catch dec_message(MsgWithOkVersion)) of
  	Msg when is_record(Msg, message) ->
  