Function: calc-enter

calc-enter is an interactive and byte-compiled function defined in calc.el.gz.

Signature

(calc-enter N)

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc.el.gz
;;; Stack management commands.

(defun calc-enter (n)
  (interactive "p")
  (let ((num (if calc-context-sensitive-enter (max 1 (calc-locate-cursor-element (point))))))
    (calc-wrapper
     (cond ((< n 0)
            (calc-push-list (calc-top-list 1 (- n))))
           ((= n 0)
            (calc-push-list (calc-top-list (calc-stack-size))))
           (num
            (calc-push-list (calc-top-list n num)))
           (t
            (calc-push-list (calc-top-list n)))))
    (if (and calc-context-sensitive-enter (> n 0)) (calc-cursor-stack-index (+ num n)))))