Changeset d40b14 in git

Timestamp:

Oct 6, 2014, 2:54:35 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')

Children:

53f0fdd98dedf0bdee39b301dff637963815094b

Parents:

490f7981219a2c643e48e00c69b91d7133908753

Message:

fix: tr.#650 (check for attrib-isSB)

Files:

• Singular/subexpr.cc (modified) (1 diff)
• Tst/Short/bug_tr650.res.gz.uu (added)
• Tst/Short/bug_tr650.stat (added)
• Tst/Short/bug_tr650.tst (added)
• Tst/Short/ok_s.lst (modified) (1 diff)

Singular/subexpr.cc

@@ -1429 +1429 @@
 BOOLEAN assumeStdFlag(leftv h)
 {
-  if ((h->e!=NULL)&&(h->LTyp()==LIST_CMD))
-  {
-    return assumeStdFlag(h->LData());
+  if (h->e!=NULL)
+  {
+    leftv hh=h->LData();
+    if (h!=hh) return assumeStdFlag(h->LData());
   }
   if (!hasFlag(h,FLAG_STD))

Tst/Short/ok_s.lst

@@ -15 +15 @@
 bug_tr630
 bug_tr640
+bug_tr650
 bug_genus_etc
 facstd