               (start-line start-column end-line end-column num count)
               (mapcar 'string-to-number rest)
 
+            (if (> count max-count)
+                (setq max-count count))
+
             (if (and (string= (file-name-nondirectory file) file-name))
                 (push
                  (make-go--covered

  "Coverage color of untracked code."
  :group 'go-cover)

(defface go-coverage-covered
  '((t (:foreground "#2cd495")))
  "Coverage color of covered code."
  :group 'go-cover)

(defface go-coverage-uncovered
  '((t (:foreground "#c00000")))
  "Coverage color of uncovered code."
  :group 'go-cover)


(defvar go-mode-syntax-table
  (let ((st (make-syntax-table)))

    (point)))

(defstruct go--covered
  start-line start-column end-line end-column covered count)

(defun go-coverage (input)
  "Open a clone of the current buffer and overlay it with
