anchor.diff:       {ecdsa, [], [sign_verify
                   %% Does not work yet:  ,public_encrypt, private_encrypt
                    ]},
  +     {ed25519, [], [sign_verify
  +                %% Does not work yet:  ,public_encrypt, private_encrypt
  +                 ]},
  +     {ed448, [], [sign_verify
  +                %% Does not work yet:  ,public_encrypt, private_encrypt
  +                 ]},
        {dh, [], [generate_compute,
                  compute_bug]},
        {ecdh, [], [generate_all_supported, compute, generate]},
  
positive.code: %%
  %% %CopyrightBegin%
  %%
  %% Copyright Ericsson AB 1999-2018. All Rights Reserved.
  
negative.code:                      {expected, Plain},
                       {got, Other1}})
      end.
  
  do_sign_verify({Type, undefined=Hash, Private, Public, Msg, Signature}) ->
      case crypto:sign(eddsa, Hash, Msg, [Private,Type]) of
          Signature ->
              ct:log("OK crypto:sign(eddsa, ~p, Msg, [Private,~p])", [Hash,Type]),
              case crypto:verify(eddsa, Hash, Msg, Signature, [Public,Type]) of
                  true ->
                      ct:log("OK crypto:verify(eddsa, ~p, Msg, Signature, [Public,~p])", [Hash,Type]),
                      negative_verify(eddsa, Hash, Msg, <<10,20>>, [Public,Type]);
                  false ->
                      ct:log("ERROR crypto:verify(eddsa, ~p, Msg= ~p, Signature= ~p, [Public= ~p,~p])",
                             [Hash,Msg,Signature,Public,Type]),
                      ct:fail({{crypto, verify, [eddsa, Hash, Msg, Signature, [Public,Type]]}})
              end;
          ErrorSig ->
              ct:log("ERROR crypto:sign(~p, ~p, ..., [Private= ~p,~p])", [eddsa,Hash,Private,Type]),
              ct:log("ERROR crypto:verify(eddsa, ~p, Msg= ~p, [Public= ~p,~p])~n"
                     "ErrorSig   = ~p~n"
                     "CorrectSig = ~p~n"
                    ,
                     [Hash,Msg,Public,Type,ErrorSig,Signature]),
              ct:fail({{crypto, sign, [Type, Hash, Msg, ErrorSig, [Private]]}})
      end;
  
  do_sign_verify({Type, Hash, Public, Private, Msg}) ->
      Signature = crypto:sign(Type, Hash, Msg, Private),
  