Changeset 7cdf2b1 in git

Timestamp:

May 29, 2009, 6:25:12 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

a4c5b94c36005f5de0d0d41f05a8e61dcdf10ada

Parents:

342afc797694d1826b3a335435a298d46400c5a9

Message:

*hannes: test_cmd for tests extended


git-svn-id: file:///usr/local/Singular/svn/trunk@11863 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

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

Singular/ipshell.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipshell.cc,v 1.205 2009-05-05 09:54:37 Singular Exp $ */
+/* $Id: ipshell.cc,v 1.206 2009-05-29 16:25:12 Singular Exp $ */
 /*
 * ABSTRACT:
@@ -503 +503 @@
 void test_cmd(int i)
 {
-  int ii=(char)i;
-
-  if (i == (-32))
-  {
-    test = 0;
+  int ii;
+
+  if (i<0)
+  {
+    ii= -i;
+    if (ii < 32)
+    {
+      test &= ~Sy_bit(ii);
+    }
+    else if (ii < 64)
+    {
+      verbose &= ~Sy_bit(ii-32);
+    }
+    else
+      WerrorS("out of bounds\n");
+  }
+  else if (i<32)
+  {
+    ii=i;
+    if (Sy_bit(ii) & kOptions)
+    {
+      Warn("Gerhard, use the option command");
+      test |= Sy_bit(ii);
+    }
+    else if (Sy_bit(ii) & validOpts)
+      test |= Sy_bit(ii);
+  }
+  else if (i<64)
+  {
+    ii=i-32;
+    verbose |= Sy_bit(ii);
   }
   else
-  {
-    if (i<0)
-    {
-      ii= -i;
-      if (Sy_bit(ii) & kOptions)
-      {
-        Warn("Gerhard, use the option command");
-        test &= ~Sy_bit(ii);
-      }
-      else if (Sy_bit(ii) & validOpts)
-        test &= ~Sy_bit(ii);
-    }
-    else if (i<32)
-    {
-      if (Sy_bit(ii) & kOptions)
-      {
-        Warn("Gerhard, use the option command");
-        test |= Sy_bit(ii);
-      }
-      else if (Sy_bit(ii) & validOpts)
-        test |= Sy_bit(ii);
-    }
-  }
+    WerrorS("out of bounds\n");
 }