#1375 integration error

[Anonymous]

This prob has been discussed in ML.Here it its link:
http://www.math.utexas.edu/pipermail/maxima/2008/010566.html

Hi,all.I use Maxima 5.14.0 ,and find an error that I think is a bug of
Maxima.Hope to FIX IT.

Here it is:

(%i1) integrate(cos(a*x)/(1+x^2),x,0,inf);
Is a positive, negative, or zero? zero;
Maxima encountered a Lisp error:
Error in PROGN [or a callee]: Caught fatal error [memory may be damaged]
Automatically continuing.
To reenable the Lisp debugger set *debugger-hook* to nil.

The following is a fix from Robert Dodier:

It appears that the bug originates from a MRAT expression which
some function isn't prepared to handle ... The following patch fixes
this bug. Not sure yet what other effect it might have.

--- src/defint.lisp 17 Feb 2008 20:54:22 -0000 1.55
+++ src/defint.lisp 23 Mar 2008 15:59:15 -0000
@@ -1015,7 +1015,7 @@
(eq ($sign (m+ (deg (setq nn* ($imagpart (caddr term))))
-2.))
'$neg))
- (cond ((eq ($asksign (ratcoef nn* var)) '$pos)
+ (cond ((eq ($asksign (ratdisrep (ratcoef nn* var))) '$pos)
(setq *updn t))
(t (setq *updn nil)))
term)

[Robert Dodier]

Logged In: YES
user_id=501686
Originator: NO

Patch applied & committed as src/defint.lisp r1.56. Closing this report as fixed.