[Maxima-commits] [git] Maxima CAS branch master updated. branch-5_49-base-549-g76e6b850b

[tomasriker <tom...@us...>]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Maxima CAS".

The branch, master has been updated
       via  76e6b850b2ac06f1cdd3891ce1c23fa7091ce6d4 (commit)
      from  96ea422c6c5dbf5440ea544500fe8fc885247b64 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 76e6b850b2ac06f1cdd3891ce1c23fa7091ce6d4
Author: David Scherfgen <d.s...@go...>
Date:   Fri May 29 14:26:37 2026 +0200

    SIGNDIFF-SPECIAL: if SGN already set, prevent swap/flip
    
    Fix an oversight from previous commit

diff --git a/src/compar.lisp b/src/compar.lisp
index 3e33b3800..22ee4e03e 100644
--- a/src/compar.lisp
+++ b/src/compar.lisp
@@ -1582,7 +1582,7 @@ TDNEG TDZERO TDPN) to store it, and also sets SIGN."
     
     ;; For the following test, swap XLHS and XRHS, if necessary, so that XRHS is
     ;; the number, e.g. x^2 - 3 -> 3 - x^2, and remember to flip the result.
-    (when (and (mnump xlhs) (not (mnump xrhs)))
+    (when (and (null sgn) (mnump xlhs) (not (mnump xrhs)))
       (psetq xlhs xrhs xrhs xlhs flip-sign (not flip-sign)))
     
     ;; sign(a^pos_int - b) = sign(abs_if_even(a) - b^(1/pos_int))

-----------------------------------------------------------------------

Summary of changes:
 src/compar.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)


hooks/post-receive
-- 
Maxima CAS