Changeset 509339 in git

Timestamp:

Apr 3, 2009, 8:27:19 PM (14 years ago)

Author:

Motsak Oleksandr <motsak@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

69262fa0701b9d59e896f3f94f538bb7df85958d

Parents:

5cd07be4a9020449652234e084630e174f38fd2a

Message:

*motsak: zero input to bracket


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

File:

• Singular/iparith.cc (modified) (2 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.502 2009-03-11 16:14:31 Singular Exp $ */
+/* $Id: iparith.cc,v 1.503 2009-04-03 18:27:19 motsak Exp $ */
 
 /*
@@ -2620 +2620 @@
 static BOOLEAN jjBRACKET(leftv res, leftv a, leftv b)
 {
+  res->data=NULL;
+            
   if (rIsPluralRing(currRing))
   {
-    poly p = (poly)a->CopyD(POLY_CMD);
-    poly q = (poly)b->Data();
-    res->data = nc_p_Bracket_qq(p,q);
-  }
-  else res->data=NULL;
+    const poly q = (poly)b->Data();
+
+    if( q != NULL )
+    {
+      if( (poly)a->Data() != NULL )
+      {
+        poly p = (poly)a->CopyD(POLY_CMD); // p = copy!
+        res->data = nc_p_Bracket_qq(p,q); // p will be destroyed!
+      }
+    }
+  }
   return FALSE;
 }