Changeset 69c765 in git

Timestamp:

Feb 25, 2015, 11:27:10 AM (9 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

d65bb4a479a8d896ce2cb336fedc7f7b00441f4d

Parents:

e10ff2e8b22550dc6590864fd03cd98b17001f63

Message:

minor: handle exceptional cases in a better way

File:

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

Singular/iparith.cc

@@ -6154 +6154 @@
     return TRUE;
   }
+  res->rtyp=IDEAL_CMD;
   if ((mk < 1) || (mk > m->rows()) || (mk > m->cols()))
   {
-    Werror("invalid size of minors: %d (matrix is (%d x %d))", mk,
-           m->rows(), m->cols());
-    return TRUE;
+    ideal I=idInit(1,1);
+    if (mk<1) I->m[0]=p_One(currRing);
+    //Werror("invalid size of minors: %d (matrix is (%d x %d))", mk,
+    //       m->rows(), m->cols());
+    res->data=(void*)I;
+    return FALSE;
   }
   if ((!noAlgorithm) && (strcmp(algorithm, "Cache") == 0)
@@ -6179 +6183 @@
                               (noIdeal ? 0 : IasSB), false);
   if (v_typ!=MATRIX_CMD) idDelete((ideal *)&m);
-  res->rtyp = IDEAL_CMD;
   return FALSE;
 }