Changeset f7c78e2 in git for Singular/subexpr.cc

Timestamp:

Jan 22, 2019, 11:04:37 AM (5 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'd0474371d8c5d8068ab70bfb42719c97936b18a6')

Children:

5abb79fd2458b47b21d297f2c8b26f285ac9546f

Parents:

937c89ec020469703d18b67056c4ad5c6dbf4459

Message:

fix: read number in LP ring

File:

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

Singular/subexpr.cc

@@ -1698 +1698 @@
     }
     /* 6. local ring: number/poly */
-    if ((currRingHdl!=NULL) && (IDLEV(currRingHdl)==myynest)
-    #ifdef HAVE_SHIFTBBA
-    && (currRing->isLPring==0)
-    #endif
-    )
+    if ((currRingHdl!=NULL) && (IDLEV(currRingHdl)==myynest))
     {
       BOOLEAN ok=FALSE;
@@ -1730 +1726 @@
         else
         {
+          v->name = id;
+        #ifdef HAVE_SHIFTBBA
+          if ((currRing->isLPring!=0)
+          && (p_Totaldegree(p,currRing)>1))
+          {
+            p_Delete(&p,currRing);
+            /* v->rtyp = UNKNOWN; - already set */
+            return; /* error, report "unknown id" */
+          }
+        #endif
           v->data = p;
           v->rtyp = POLY_CMD;
-          v->name = id;
         }
         return;