Changeset 6dffa9 in git for Singular/iparith.cc

Timestamp:

Sep 7, 2012, 8:09:08 PM (12 years ago)

Author:

Oleksandr Motsak <malex984@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

8357e215b04863da2f7f9897d29475d589e7c2f89952bd4644408a55960f0436312937dc4ea343e8

Parents:

8181f5de8ac7b3396b44ed1178dee9ca26cb30d63aa7f93d31834027b404915aa08af57549f43bd6

Message:

Merge pull request #181 from alexanderdreyer/spielwiese-countedref-squashed

Extension: adding 'reference' and 'shared' to spielwiese

File:

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

Singular/iparith.cc

@@ -7744 +7744 @@
 #endif
     int at=a->Typ();
+    int bt=b->Typ();
     if (at>MAX_TOK)
     {
@@ -7750 +7751 @@
       else          return TRUE;
     }
-    int bt=b->Typ();
+    else if ((bt>MAX_TOK)&&(op!='('))
+    {
+      blackbox *bb=getBlackboxStuff(bt);
+      if (bb!=NULL) return bb->blackbox_Op2(op,res,a,b);
+      else          return TRUE;
+    }
     int i=iiTabIndex(dArithTab2,JJTAB2LEN,op);
     int index=i;