anchor.diff:    (cffi:load-foreign-library 'libssl)
     (cffi:load-foreign-library 'libeay32)
     (setf *ssl-global-context* nil)
  -  (setf *ssl-global-method* nil))
  +  (setf *ssl-global-method* nil)
  +  (setf *tmp-rsa-key-512* nil)
  +  (setf *tmp-rsa-key-1024* nil))
  
positive.code: (defconstant +SSL_CTRL_MODE+ 33)
  
  (defconstant +SSL_MODE_ACCEPT_MOVING_WRITE_BUFFER+ 2)
  
  ;;; Misc
  ;;;
  
negative.code:   (setf *ssl-global-context* (ssl-ctx-new *ssl-global-method*))
    (ssl-ctx-set-session-cache-mode *ssl-global-context* 3)
    (ssl-ctx-set-default-passwd-cb *ssl-global-context* 
                                   (cffi:callback pem-password-callback))
    (ssl-ctx-set-tmp-rsa-callback *ssl-global-context* (cffi:callback need-tmp-rsa-callback)))
  
  (defun ensure-initialized (&key (method 'ssl-v23-method) (rand-seed nil))
    "In most cases you do *not* need to call this function, because it 
  