Changeset 6ac003 in git

Timestamp:

Nov 9, 2012, 2:14:39 PM (11 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

a2da9ea07b27576399fa96413ca380533784bd58

Parents:

e0c0a7d767e7963785151c5a84d9afbc805dd263

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2012-11-09 14:14:39+01:00

git-committer:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2012-11-09 14:40:33+01:00

Message:

fix: ntInit(p,...) in char p

File:

• libpolys/polys/ext_fields/transext.cc (modified) (2 diffs)

libpolys/polys/ext_fields/transext.cc

@@ -528 +528 @@
 number ntInit(long i, const coeffs cf)
 {
-  if (i == 0) return NULL;
-  else
-  {
-    fraction result = (fraction)omAlloc0Bin(fractionObjectBin);
-    NUM(result) = p_ISet(i, ntRing);
-    //DEN(result) = NULL; // done by omAlloc0Bin
-    //COM(result) = 0; // done by omAlloc0Bin
-    ntTest((number)result);
-    return (number)result;
-  }
+  if (i != 0)
+  {
+    poly p=p_ISet(i, ntRing);
+    if (p!=NULL)
+    {
+      fraction result = (fraction)omAlloc0Bin(fractionObjectBin);
+      NUM(result) = p;
+      //DEN(result) = NULL; // done by omAlloc0Bin
+      //COM(result) = 0; // done by omAlloc0Bin
+      ntTest((number)result);
+      return (number)result;
+    }
+  }
+  return NULL;
 }
 
@@ -544 +548 @@
 number ntInit(poly p, const coeffs cf)
 {
-  if (p == 0) return NULL;
+  if (p == NULL) return NULL;
 
     number g;