anchor.diff:    "This function returns a closure that can be called multiple times with data
      from a RethinkDB response. If a full response is received (over one or more
      calls) it returns the *full byte array of the response*, otherwise nil.
  -   
  +
      Note that the response chunks MUST be passed in in the order received."
     (let ((token nil)
           (response-buffer (fast-io:make-output-buffer))
  
positive.code: (define-condition query-compile-error (query-error) ()
    (:report (lambda (c s) (format s "Query failed to compile (~a): ~a~%---~%~a" (query-error-token c) (query-error-msg c) (query-error-query c))))
    (:documentation "A query compile error condition."))
    
  (define-condition query-runtime-error (query-error) ()
    (:report (lambda (c s) (format s "Query runtime error (~a): ~a~%---~%~a" (query-error-token c) (query-error-msg c) (query-error-query c))))
    (:documentation "A query runtime error condition."))
  
negative.code:               (format t "~%")))
            (error (e) (format t "(err) ~a~%" e)))
          (disconnect main-sock)))))
  