Mercurial > emacs
changeset 66865:7e4742b0d788
(calc-left-divide): New function.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Mon, 14 Nov 2005 20:13:46 +0000 |
| parents | 22f581f4fe39 |
| children | 28b28c1cd22f |
| files | lisp/calc/calc.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc.el Mon Nov 14 20:13:25 2005 +0000 +++ b/lisp/calc/calc.el Mon Nov 14 20:13:46 2005 +0000 @@ -2027,6 +2027,10 @@ (calc-slow-wrapper (calc-binary-op "/" 'calcFunc-div arg 0 'calcFunc-inv '/))) +(defun calc-left-divide (arg) + (interactive "P") + (calc-slow-wrapper + (calc-binary-op "ldiv" 'calcFunc-ldiv arg 0 nil nil))) (defun calc-change-sign (arg) (interactive "P")