Changeset b5cf9a in git

Timestamp:

Aug 31, 2016, 5:21:18 PM (8 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

c2d5950c29eb7ea5d90b0883de5d2f6211883761

Parents:

9927a9a13109208ae95af976af08e08f4b779fd1

Message:

Singular_4_1: forbid to kill ZZ,QQ, etc.

File:

• Singular/subexpr.cc (modified) (1 diff)

Singular/subexpr.cc

@@ -492 +492 @@
 #ifdef SINGULAR_4_1
     case CRING_CMD:
-      nKillChar((coeffs)d);
-      break;
+      {
+        coeffs cf=(coeffs)d;
+        if ((cf->ref<=1)&&
+        ((cf->type <=n_long_R)
+          ||((cf->type >=n_long_C)&&(cf->type <=n_CF))))
+        {
+          Werror("cannot kill %s",n_CoeffName(cf));
+        }
+        else
+          nKillChar((coeffs)d);
+        break;
+      }
     case CNUMBER_CMD:
       {