From: SourceForge.net <noreply@so...>  20040225 20:17:27

Bugs item #903935, was opened at 20040225 00:03 Message generated for change (Comment added) made by macrakis You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=104933&aid=903935&group_id=4933 Category: None Group: None Status: Open Resolution: None Priority: 5 Submitted By: Stavros Macrakis (macrakis) Assigned to: Nobody/Anonymous (nobody) >Summary: mul2* doesn't handle floats/FIX Initial Comment: mul2* is the twoargument nonsimplifying symbolic multiplication function (defined in opers.lisp). I think it is incorrect that if its args are numbers, it uses fixnum multiplication (f*) rather than general multiplication (*), though I can't find any cases where it matters. All the other XXX, XXX*, XXX2 and XXX2* operations in opers use general Lisp arithmetic, not fixnum.  >Comment By: Stavros Macrakis (macrakis) Date: 20040225 15:05 Message: Logged In: YES user_id=588346 (defmfun mul2* (x y) (cond #+cl ((and (numberp x) (numberp y)) (* x y)) ;;;;;;;;;;;;; used to be (f* x y) ((=1 x) (simplifya y nil)) ((=1 y) (simplifya x nil)) (t (simplifya `((mtimes) ,x ,y) nil))))  You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=104933&aid=903935&group_id=4933 