emacs – The Void

(defun string-dec-to-hex ()
  "replaces decimal number under cursor with hexadecimal equivalent"
  (interactive)
  (let* ((dec-string (thing-at-point 'word))
         (bounds (bounds-of-thing-at-point 'word))
         (dec (string-to-number dec-string))
         (hex (format "%x" dec)))
    (delete-region (car bounds) (cdr bounds))
    (insert hex)))

(defun string-dec-to-hex ()

"replaces decimal number under cursor with hexadecimal equivalent"

(interactive)

(let* ((dec-string (thing-at-point 'word))

(bounds (bounds-of-thing-at-point 'word))

(dec (string-to-number dec-string))

(hex (format "%x" dec)))

(delete-region (car bounds) (cdr bounds))

(insert hex)))

The Void

Tag: emacs

Emacs Lisp Script to Replace Decimal Number with Hexadecimal