Changeset fbac08 in git

Timestamp:

Apr 25, 2017, 4:06:52 PM (7 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

6af76a7a09a49e7e08065cdf078b2461e16af2eb

Parents:

d0a9fbc2ee7c69e2a05d046733d2b5eb8059f2d1

Message:

format

File:

• kernel/GBEngine/kInline.h (modified) (2 diffs)

kernel/GBEngine/kInline.h

@@ -363 +363 @@
     }
   }
-  else if (p != NULL)
+  else if (p != NULL) /* && t_p==NULL */
   {
     if (pNext(p) != NULL)
@@ -427 +427 @@
   assume(p != NULL);
   if (TEST_OPT_CONTENTSB)
-    {
-      number n;
-      if (t_p != NULL)
-        {
-          p_Cleardenom_n(t_p, tailRing, n);
-          pSetCoeff0(p, pGetCoeff(t_p));
-        }
-      else
-        {
-          p_Cleardenom_n(p, currRing, n);
-        }
-      if (!nIsOne(n))
-        {
-          denominator_list denom=(denominator_list)omAlloc(sizeof(denominator_list_s));
-          denom->n=nInvers(n);
-          denom->next=DENOMINATOR_LIST;
-          DENOMINATOR_LIST=denom;
-        }
-      nDelete(&n);
-    }
-  else
-    {
-      if (t_p != NULL)
-      {
-        p_ProjectiveUnique(t_p, tailRing);
-        pSetCoeff0(p, pGetCoeff(t_p));
-      }
-      else
-      {
-        p_ProjectiveUnique(p, currRing);
-      }
-    }
+  {
+    number n;
+    if (t_p != NULL)
+    {
+      p_Cleardenom_n(t_p, tailRing, n);
+      pSetCoeff0(p, pGetCoeff(t_p));
+    }
+    else
+    {
+      p_Cleardenom_n(p, currRing, n);
+    }
+    if (!nIsOne(n))
+    {
+      denominator_list denom=(denominator_list)omAlloc(sizeof(denominator_list_s));
+      denom->n=nInvers(n);
+      denom->next=DENOMINATOR_LIST;
+      DENOMINATOR_LIST=denom;
+    }
+    nDelete(&n);
+  }
+  else
+  {
+    if (t_p != NULL)
+    {
+      p_ProjectiveUnique(t_p, tailRing);
+      pSetCoeff0(p, pGetCoeff(t_p));
+    }
+    else
+    {
+      p_ProjectiveUnique(p, currRing);
+    }
+  }
 }