anchor.diff:    (:documentation "The verifier to use for the client request."))
   
   (defgeneric verify (client verf)
  -  (:documentation "Verify the response received from the server."))
  +  (:documentation "Verify the response received from the server. Signals an error on failure."))
   
   
   ;; default methods for auth-null flavour authentication 
  
positive.code: 				   :service :none
  				   :handle (gss-client-handle client))))
  
  ;; ---------------------------------------------------------
  
  (defun rpc-connect (host port &optional (protocol :udp))
    "Establish a connection to the rpc server."
    (ecase protocol
      (:udp 
       (usocket:socket-connect host port
  
negative.code:     (unless (des-valid-server-verifier (des-client-key client)
  				       (des-client-timestamp client)
  				       v)
        (error 'rpc-error :description "Invalid DES verifier"))))
  
  ;; ----------------- gss ---------------
  
  