Function: calc-pop-stack-in-macro

calc-pop-stack-in-macro is a byte-compiled function defined in calc-prog.el.gz.

Signature

(calc-pop-stack-in-macro N MM)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-prog.el.gz
(defun calc-pop-stack-in-macro (n mm)
  (if (> mm 1)
      (setcdr (nthcdr (- mm 2) calc-stack)
	      (nthcdr (+ n mm -1) calc-stack))
    (setq calc-stack (nthcdr n calc-stack))))