Function: number-to-register
number-to-register is an interactive and byte-compiled function
defined in register.el.gz.
Signature
(number-to-register NUMBER REGISTER)
Documentation
Store a number in a register.
Two args, NUMBER and REGISTER (a character, naming the register). If NUMBER is nil, a decimal number is read from the buffer starting at point, and point moves to the end of that number. Interactively, NUMBER is the prefix arg (none means nil).
Interactively, reads the register using register-read-with-preview.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/register.el.gz
(defun number-to-register (number register)
"Store a number in a register.
Two args, NUMBER and REGISTER (a character, naming the register).
If NUMBER is nil, a decimal number is read from the buffer starting
at point, and point moves to the end of that number.
Interactively, NUMBER is the prefix arg (none means nil).
Interactively, reads the register using `register-read-with-preview'."
(interactive (list current-prefix-arg
(register-read-with-preview "Number to register: ")))
(set-register register
(if number
(prefix-numeric-value number)
(if (looking-at "\\s-*-?[0-9]+")
(progn
(goto-char (match-end 0))
(string-to-number (match-string 0)))
0))))