anchor.diff:  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ;;; Conncetion entry-point
   (defun mysql-connect (&key (host "localhost") (port 3306) (username "") (password "") database (ssl :unspecified) ssl-verify)
  +  "Connect to a MySQL over a network (AF_INET) socket and begin the MySQL Handshake.
  +   Returns a QMYND:MYSQL-CONNECTION object or signals a QMYND:MYSQL-ERROR.
  +   Accepts the following keyword arguments:
  +    HOST: The host to connect to. (default: \"localhost\")
  +    PORT: The port to connect to. (default: 3306)
  +    USERNAME: User to authenticate as.
  +    PASSWORD: Password to authenticate with.
  +    DATABASE: What database to use upon connecting. (default: nil)
  +    SSL: Whether or not to use SSL. (default: :UNSPECIFIED)
  +                     T - Forces SSL (or error out if it's not available).
  +                   NIL - Disable SSL, even if it is available.
  +          :UNSPECIFIED - Opportunistic use of SSL.
  +    SSL-VERIFY: Whether or not to verify the SSL certificate presented by the server. (Default: nil)"
     ;; Open Socket
     (let* ((socket (usocket:socket-connect host port
                                            :protocol :stream
  
positive.code:     (mysql-connect-do-handshake connection username password database :ssl nil)))
  
  (defmethod mysql-disconnect ((c mysql-base-connection))
    (when (mysql-connection-connected c)
      (with-mysql-connection (c)
        (send-command-quit))))
  
negative.code: ;;; AF_LOCAL sockets should really be folded into usocket. For now, just implement CCL and SBCL support.
  #+(or ccl sbcl)
  (defun mysql-local-connect (&key (path #P"/var/run/mysqld/mysqld.sock") (username "") (password "") database)
    "Connect to a MySQL over a local (AF_LOCAL) socket and begin the MySQL Handshake.
     Returns a QMYND:MYSQL-CONNECTION object or signals a QMYND:MYSQL-ERROR.
     Accepts the following keyword arguments:
      PATH: The path of the local socket to connect to. (default: #P\"/var/run/mysqld/mysqld.sock\")
      USERNAME: User to authenticate as.
      PASSWORD: Password to authenticate with.
      DATABASE: What database to use upon connecting. (default: nil)"
    ;; Open Socket
    (let* ((socket
             #+ccl (ccl:make-socket :address-family :file
  