Function: calc-edit

calc-edit is an autoloaded, interactive and byte-compiled function defined in calc-yank.el.gz.

Signature

(calc-edit N)

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-yank.el.gz
(defun calc-edit (n)
  (interactive "p")
  (calc-slow-wrapper
   (when (eq n 0)
     (setq n (calc-stack-size)))
   (let* (;; (flag nil)
	  (allow-ret (> n 1))
	  (list (math-showing-full-precision
		 (mapcar (if (> n 1)
                             (lambda (x)
                               (math-format-flat-expr x 0))
                           (lambda (x)
                             (if (math-vectorp x) (setq allow-ret t))
                             (math-format-nice-expr x (frame-width))))
			 (if (> n 0)
			     (calc-top-list n)
			   (calc-top-list 1 (- n)))))))
     (calc--edit-mode (lambda () (calc-finish-stack-edit n)) ;; (or flag n)
                      allow-ret)
     (while list
       (insert (car list) "\n")
       (setq list (cdr list)))))
  (calc-show-edit-buffer))