Changeset 1c2317 in git

Timestamp:

May 8, 2014, 11:00:59 AM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

940230a149b3bac4c8d39671078f7fb77bb097e6

Parents:

83ce221ff06900901bec39d172e89083a2a00b8f

Message:

removed unused special handling of '(' from example bigintm

File:

• Singular/dyn_modules/bigintm/bigintm.cc (modified) (5 diffs)

Singular/dyn_modules/bigintm/bigintm.cc

@@ -110 +110 @@
 */
 
-  if( op=='(' ) // <bigintm>  VAR();
-  {
-    Werror("bigintm_Op1: What do you mean by '<bigintm>()'?!");
-    return TRUE;
-  }
-
   return blackboxDefaultOp1(op, l, r);
 }
@@ -200 +194 @@
       return TRUE;
     }
-/*
-    /// TODO: Why is this ignored???!
-    case '(' : // <bigintm>  VAR(b);
-    {
-      Werror("bigintm_Op2: What du you mean by '<bigintm>(...%s...)'?!", Tok2Cmdname(a2->Typ()));
-      return TRUE;
-    }
-*/
+
     case EQUAL_EQUAL:
     {
@@ -221 +208 @@
         res->data=(void *) (long) n_Equal(n1,n2, coeffs_BIGINT);
         res->rtyp= INT_CMD;
+        n_Delete(&n2,coeffs_BIGINT);
         return FALSE;
       }
@@ -245 +233 @@
 
       Werror("bigintm_Op2: Op: '.': 2nd argument-type: '%s'(%d) is called '%s' in ", Tok2Cmdname(a2->Typ()), a2->Typ(), a2->name);
-      return blackboxDefaultOp2(op,res,a1,a2);
+      return TRUE;
     }
 
@@ -267 +255 @@
     }
 
-    /// TODO: Why is this used for ALL the cases: even for "a(1)"  ???!
-    case '(' : // <bigintm>  VAR(b,...);
-    {
-      Werror("bigintm_OpM: What do you mean by '<bigintm>(...)'?!");
-      return TRUE;
-    }
-
     default:
       return blackbox_default_OpM(op, res, args);
   }
-  return TRUE;
+  return blackbox_default_OpM(op, res, args);
 }