anchor.diff:                           (setf offset
                                  (1+ (jget :update--id
                                            (car result-lst)))))
  -                     (process-tg-msg (car result-lst)))
  +                     (process-tg-msg bot (car result-lst)))
                      result))
            (condition (e)
              (progn (logging "TG-LOOP in trouble: ~S!" e)
  
positive.code:       "[ image > 600KB ]"
        (let* ((img-vector
                (tg-download-file
                 (tg-get-file-path
                  (jget :file--id
                        (jget :document
                              (jget :message update))))))
  
negative.code:           (< (jget :update--id a)
               (jget :update--id b)))))
  
  (defun tg-getupdate-loop (bot)
    "Need a `overheat' protection"
    (let ((offset 0))
      (loop
  