[Emacs-diffs] Changes to emacs/lisp/calc/calc-poly.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/calc/calc-poly.el
diff -c emacs/lisp/calc/calc-poly.el:1.5.4.1 
emacs/lisp/calc/calc-poly.el:1.5.4.2
*** emacs/lisp/calc/calc-poly.el:1.5.4.1        Fri Apr 16 12:50:11 2004
--- emacs/lisp/calc/calc-poly.el        Fri Nov 12 02:53:01 2004
***************
*** 1040,1046 ****
              (memq (car-safe (nth 1 expr)) '(+ -))
              (integerp (nth 2 expr))
              (if (> (nth 2 expr) 0)
!                 (or (and (or (> mmt-many 500000) (< mmt-many -500000))
                           (math-expand-power (nth 1 expr) (nth 2 expr)
                                              nil t))
                      (list '*
--- 1040,1046 ----
              (memq (car-safe (nth 1 expr)) '(+ -))
              (integerp (nth 2 expr))
              (if (> (nth 2 expr) 0)
!                 (or (and (or (> math-mt-many 500000) (< math-mt-many -500000))
                           (math-expand-power (nth 1 expr) (nth 2 expr)
                                              nil t))
                      (list '*