anchor.diff:  	false -> erlang:error(badarg)
       end.
   
  -erlint(MPInts) -> [ crypto:erlint(X) || X <- MPInts ].
  +erlint(MPInts) when is_list(MPInts) ->
  +    [erlint(X) || X <- MPInts ];
  +erlint(<<Size:32, Int:Size/unit:8>>) ->
  +    Int.
   
   -ifdef(TEST).
   
  
positive.code:      [fun() ->
  	      {ok, MPInts} = cutkey:rsa(512, 65537, [{return, full}]),
  	      8 = length(MPInts),
  	      Fun = fun(X) -> is_integer(crypto:erlint(X)) end,
  	      true = lists:all(Fun, MPInts)
        end,
        fun() ->
  
negative.code:      [fun() ->
  	      {ok, MPInts} = cutkey:rsa(512, 65537, [{return, bare}]),
  	      3 = length(MPInts),
  	      Fun = fun(X) -> is_integer(erlint(X)) end,
  	      true = lists:all(Fun, MPInts)
        end,
        fun() ->
  