Function: calculator-set-register

calculator-set-register is an interactive and byte-compiled function defined in calculator.el.gz.

Signature

(calculator-set-register REG)

Documentation

Set a register value for REG.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/calculator.el.gz
(defun calculator-set-register (reg)
  "Set a register value for REG."
  (interactive (list (calculator-register-read-with-preview
                      "Register to store value into: ")))
  (let* ((as  (assq reg calculator-registers))
         (val (progn (calculator-enter) (car calculator-stack))))
    (if as
      (setcdr as val)
      (push (cons reg val) calculator-registers))
    (calculator-message "[%c] := %S" reg val)))