anchor.diff:  ) ->
       ValidateSignature =
           fun (#request_validation_state
  -            { creds_client = {some, ClientCredentials}
  -            , creds_token  = {some, Token}
  +            { client_creds = {some, ClientCredentials}
  +            , token_final  = {some, Token}
               }=State) ->
               ClientSharedSecret =
                   oauth1_credentials:get_secret(ClientCredentials),
  
positive.code: ) ->
      ValidateSignature =
          fun (#request_validation_state
              { creds_client = {some, ClientCredentials}
              , creds_token  = {some, Token}
              , verifier     = {some, Verifier}
              }=State) ->
              ClientSharedSecret =
  
negative.code:     #oauth1_server_args_validate_resource_request{}.
  
  -record(request_validation_state,
      { client_creds = none :: hope_option:t(oauth1_credentials:t(client))
      , token_tmp    = none :: hope_option:t(oauth1_credentials:t(tmp))
      , token_final  = none :: hope_option:t(oauth1_credentials:t(token))
      , verifier     = none :: hope_option:t(oauth1_verifier:t())
  
      , result       = none :: hope_option:t(any())
  