anchor.diff:                 (key (car split))
                  (val (cadr split))
                  (val (do-urlencode:urldecode val :lenientp t :queryp t)))
  -          (set-querystring-hash main-hash key val)))
  -      main-hash)))
  +          (setf main-hash (set-querystring-hash main-hash key val))))
  +      (convert-hash-vectors main-hash))))
   
   (defun print-hash (hash-table &optional (indent 0))
     "Useful for debugging hash tables."
  
positive.code:    Would update `myhash` with
       [body] => < hash: [tags] => \"dogs,animals,bark\" >"
    (let* ((subkeys (cl-ppcre:split "(\\]\\[|\\[|\\])" key))
           (subkeys (remove-if #'null subkeys))
           (curhash hash))
      (dotimes (i (length subkeys))
        (let ((subkey (car subkeys))
              (is-last (null (cdr subkeys))))
          (if is-last
              (progn
                (setf (gethash subkey curhash) val)
                (return))
              (progn
                (unless (hash-table-p (gethash subkey curhash))
                  (setf (gethash subkey curhash) (make-hash-table :test #'equal)))
                (setf curhash (gethash subkey curhash)
                      subkeys (cdr subkeys))))))))
  
  (defun querystring-to-hash (querystring)
    "Convert a querystring into a hash table."
  
negative.code:   "Detects if the given string is an HTTP querystring."
    (cl-ppcre:scan *scanner-querystring-p* querystring))
  
  (defun get-querystring-hash-r (container subkeys val)
    "Recursively build a tree of hashes based on a given set of subkeys in a query
     string."
    (unless subkeys
      (return-from get-querystring-hash-r val))
    (let* ((key (car subkeys)))
      (let ((container (if container
                           container
                           (make-hash-table :test #'equal))))
        (let ((newcontainer (gethash key container)))
          (setf (gethash key container) (get-querystring-hash-r newcontainer (cdr subkeys) val)))
        container)))
  
  (defun set-querystring-hash (hash key val)
    "Set the key of a querystring var into a hash, creating as many nested hashes
     as needed. For instance:
  