Changeset 8357e21 in git for Singular/ipassign.cc

Timestamp:

Jun 28, 2012, 3:32:59 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

19b0184aff4a5a9ba4c2d12f88c2c9ec66e5552c

Parents:

6dffa9e5b66ac5a81df2b68ff1c38dafc918b1f9

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2012-06-28 15:32:59+02:00

git-committer:

Alexander Dreyer <alexander.dreyer@itwm.fraunhofer.de>2012-09-08 00:20:22+02:00

Message:

fix: #433, type change in newstruct assignments

File:

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

Singular/ipassign.cc

@@ -1510 +1510 @@
       {
         bb=getBlackboxStuff(bt);
-        like_lists=BB_LIKE_LIST(bb);
+        like_lists=BB_LIKE_LIST(bb); // bb like a list
       }
       else if (((l->rtyp==IDHDL) && (IDTYP((idhdl)l->data)==LIST_CMD))
         || (l->rtyp==LIST_CMD))
       {
-        like_lists=2;
+        like_lists=2; // bb in a list
       }
       if(like_lists)
       {
         if (TEST_V_ALLWARN) PrintS("assign list[..]=...or similiar\n");
+        if (like_lists==1)
+        {
+          // check blackbox/newtype type:
+          if(bb->blackbox_CheckAssign(bb,l,r)) return TRUE;
+        }
         b=jiAssign_list(l,r);
         if((!b) && (like_lists==2))
@@ -1538 +1543 @@
           omFreeBin((ADDRESS)l->e, sSubexpr_bin);
           l->e=h;
-        }
-        if ((!b) && (like_lists==1))
-        {
-          // check blackbox/newtype type:
-          if(bb->blackbox_Check(bb,l->Data())) return TRUE;
         }
         return b;