comparison lisp/calc/calc.el @ 81513:9d34273fd331

(math-standard-ops): Fix precedence of multiplication.
author Jay Belanger <jay.p.belanger@gmail.com>
date Wed, 20 Jun 2007 19:32:49 +0000
parents e51a63a95590
children 041563cafc04
comparison
equal deleted inserted replaced
81512:1214f1b9e278 81513:9d34273fd331
3504 '( "*" * 196 195 ) 3504 '( "*" * 196 195 )
3505 (cons 3505 (cons
3506 '( "2x" * 196 195 ) 3506 '( "2x" * 196 195 )
3507 math-standard-opers)) 3507 math-standard-opers))
3508 (cons 3508 (cons
3509 '( "*" * 186 185 ) 3509 '( "*" * 190 191 )
3510 (cons 3510 (cons
3511 '( "2x" * 186 185 ) 3511 '( "2x" * 190 191 )
3512 math-standard-opers)))) 3512 math-standard-opers))))
3513 3513
3514 (defun math-standard-ops-p () 3514 (defun math-standard-ops-p ()
3515 (let ((meo (caar math-expr-opers))) 3515 (let ((meo (caar math-expr-opers)))
3516 (and (stringp meo) 3516 (and (stringp meo)