Changeset 181954 in git for libpolys/polys/ext_fields

Timestamp:

Jan 28, 2014, 3:49:16 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '2a584933abf2a2d3082034c7586d38bb6de1a30a')

Children:

2505ad7ea8823c2353d6294405c1c31d1b2e5d3f

Parents:

7069f24f34180260ddad30885f3cacb4300d456d

Message:

fix: transz.ext -> alg.ext mapping

File:

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

libpolys/polys/ext_fields/algext.cc

@@ -1034 +1034 @@
   poly g = prMapR(NUM(f), nMap, rSrc, rDst);
 
-  number result;
+  number result=NULL;
   poly h = NULL;
 
@@ -1041 +1041 @@
 
   if (h!=NULL)
+  {
     result=naDiv((number)g,(number)h,dst);
-
-  p_Delete(&g,dst->extRing);
-  if (h!=NULL)
+    p_Delete(&g,dst->extRing);
     p_Delete(&h,dst->extRing);
+  }
+  else
+    result=(number)g;
+
   assume(n_Test((number)result, dst));
   return (number)result;