;;; -*- lexical-binding: t -*-
;;
;; this file:
;;   https://dataswamp.org/~incal/emacs-init/counter.el

(require 'cl-lib)

(let*((base  0   )
      (count base))

  (defun counter-add ()
    (interactive)
    (cl-incf count))

  (defun counter-echo ()
    (interactive)
    (message "count: %d" count))

  (defun counter-reset ()
    (setq count base)))

(declare-function counter-add   nil)
(declare-function counter-echo  nil)
(declare-function counter-reset nil)

;; (counter-reset)
;; (counter-echo)
;; (counter-add)

(provide 'counter)