anchor.diff:                  Other ->
                       ct:fail({{crypto, private_decrypt, [Type, PublicEcn, Private, Padding]}, {expected, Msg}, {got, Other}})
               catch
  -                ?PUB_PRIV_ENC_DEC_CATCH(Type, Padding)
  +                CC:EE ->
  +                    ct:fail({{crypto, private_decrypt, [Type, PublicEcn, Private, Padding]}, {expected, Msg}, {got, {CC,EE}}})
               end
       catch
  -        ?PUB_PRIV_ENC_DEC_CATCH(Type, Padding)
  +        CC:EE ->
  +            ct:fail({{crypto, public_encrypt, [Type, Msg, Public, Padding]}, {got, {CC,EE}}})
       end. 
   
   
  
positive.code: cmac_nist(Config, aes_cbc256 = Type) ->
     read_rsp(Config, Type,
              ["CMACGenAES256.rsp", "CMACVerAES256.rsp"]).
  
  no_padding() ->
      Public = [_, Mod] = rsa_public_stronger(),
      Private = rsa_private_stronger(),
      MsgLen = erlang:byte_size(int_to_bin(Mod)),
      Msg = list_to_binary(lists:duplicate(MsgLen, $X)),
      {rsa, Public, Private, Msg, rsa_no_padding}.
  
  int_to_bin(X) when X < 0 -> int_to_bin_neg(X, []);
  int_to_bin(X) -> int_to_bin_pos(X, []).
  
negative.code: 	    ok
      end.
  
  do_public_encrypt({Type, Public, Private, Msg, Padding}) ->
      try
          crypto:public_encrypt(Type, Msg, Public, Padding)
  