               (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

         'face 'go-coverage-untracked)

        (dolist (range ranges)
          (overlay-put
           (make-overlay
            (go--line-column-to-point
             (go--covered-start-line range)
             (go--covered-start-column range))
            (go--line-column-to-point
             (go--covered-end-line range)
             (go--covered-end-column range)))
           'face (if (go--covered-covered range) 'go-coverage-covered 'go-coverage-uncovered))))

      (display-buffer (current-buffer) 'display-buffer-reuse-window))))


  (interactive "fCoverage file: ")
  (let ((ranges '())
        (file-name (file-name-nondirectory (buffer-file-name)))
        (gocov-buffer-name (concat (buffer-name) "<gocov>"))
        (max-count 0)
        divisor)

    (with-temp-buffer
      (insert-file-contents input)
