Function: treemacs--human-readable-bytes

treemacs--human-readable-bytes is a byte-compiled function defined in treemacs-mode.el.

Signature

(treemacs--human-readable-bytes BYTES)

Documentation

Return a human-readable string version of BYTES.

Source Code

;; Defined in ~/.emacs.d/elpa/treemacs-20251226.1307/treemacs-mode.el
(define-inline treemacs--human-readable-bytes (bytes)
  "Return a human-readable string version of BYTES."
  (declare (pure t) (side-effect-free t))
  (inline-letevals (bytes)
    (inline-quote
     (cl-loop with result = (cons "B" ,bytes)
              for i in '("k" "M" "G" "T" "P" "E" "Z" "Y")
              while (>= (cdr result) 1024.0)
              do (setf result (cons i (/ (cdr result) 1024.0)))
              finally return
              (pcase (car result)
                ("B" (format "%sb" ,bytes))
                (_ (format "%.1f%s" (cdr result) (car result))))))))