Changeset a76e11 in git for kernel/pp_Mult_nn__T.cc

Timestamp:

Feb 7, 2008, 9:41:00 AM (16 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

1e36c5c49e03ef1a34a6fa933337372c1c97d6f1

Parents:

bdd99204592e417c7486a7f8d51895e883e6197e

Message:

kutilc.cc: use pp_Mult_nn instead of copy and p_Mult_nn
p_Minus...: compute length correct
pp_Mult: return null in case of null


git-svn-id: file:///usr/local/Singular/svn/trunk@10567 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• kernel/pp_Mult_nn__T.cc (modified) (3 diffs)

kernel/pp_Mult_nn__T.cc

@@ -7 +7 @@
  *  Author:  obachman (Olaf Bachmann)
  *  Created: 8/00
- *  Version: $Id: pp_Mult_nn__T.cc,v 1.7 2008-01-31 16:13:55 wienand Exp $
+ *  Version: $Id: pp_Mult_nn__T.cc,v 1.8 2008-02-07 08:41:00 wienand Exp $
  *******************************************************************/
 
@@ -22 +22 @@
   if (p == NULL) return NULL;
   spolyrec rp;
+#ifdef HAVE_ZERODIVISORS
+  rp.next = NULL;
+#endif
   poly q = &rp;
   omBin bin = r->PolyBin;
@@ -37 +40 @@
     number nc = pGetCoeff(p);
     number tmp = n_Mult(n, nc, r);
-    if (nIsZero(tmp))
+    if (! nIsZero(tmp))
     {
       p_AllocBin(pNext(q), bin, r);