- I'm fired. Fixed a really stupid bug in sr_gcd() which called

  divide_in_z(r, foo) with "var+1" as its last parameter, while the main
  variable x=*var usually appears in r. This should never have worked...

diff --git a/ginac/normal.cpp b/ginac/normal.cpp
index a15ec62d4ef1434ef1c38294ab8be41b732cb184..9cc65cad0f30e60330d8470171a824c7b617caea 100644 (file)
--- a/ginac/normal.cpp
+++ b/ginac/normal.cpp
@@ -1140,7 +1140,7 @@ static ex sr_gcd(const ex &a, const ex &b, sym_desc_vec::const_iterator var)
         c = d;
         cdeg = ddeg;
 //std::clog << " dividing...\n";
         c = d;
         cdeg = ddeg;
 //std::clog << " dividing...\n";

-        if (!divide_in_z(r, ri * pow(psi, delta), d, var+1))
+        if (!divide_in_z(r, ri * pow(psi, delta), d, var))

             throw(std::runtime_error("invalid expression in sr_gcd(), division failed"));
         ddeg = d.degree(x);
         if (ddeg == 0) {
             throw(std::runtime_error("invalid expression in sr_gcd(), division failed"));
         ddeg = d.degree(x);
         if (ddeg == 0) {