Changeset 9b107f9 in git

Timestamp:

Feb 6, 2008, 9:22:41 PM (15 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

(u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')

Children:

bdd99204592e417c7486a7f8d51895e883e6197e

Parents:

07b6ac817bf9b45f3a1072c271c5acf9ae3edbd3

Message:

warning message for rings


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

Location:

Singular

Files:

• ipshell.cc (modified) (5 diffs)
• mod2.h.in (modified) (1 diff)

Singular/ipshell.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ipshell.cc,v 1.176 2008-02-01 13:47:10 Singular Exp $ */
+/* $Id: ipshell.cc,v 1.177 2008-02-06 20:22:41 wienand Exp $ */
 /*
 * ABSTRACT:
@@ -4429 +4429 @@
     ch = 0;
     ringtype = 4;
-    WarnS("integers not yet fully tested");
   }
 #endif
@@ -4451 +4450 @@
     ringflaga = module;
     ringflagb = 1;
-    WarnS("Z/n not yet fully tested");
   }
 #endif
@@ -4493 +4491 @@
       ringflaga = base;
       ringflagb = exp;
-      WarnS("Z/p^n not yet fully tested");
     }
   }
@@ -4503 +4500 @@
   }
   pn=pn->next;
+
+#ifdef HAVE_RINGS
+  if (ringtype > 0)
+  {
+    WarnS("You are using a preview implementation of coefficients rings.");
+    WarnS("Please note that only the following commands are meant to work:");
+    WarnS("- basic polynomial arithmetic");
+    WarnS("- std");
+    WarnS("- reduce");
+  }
+#endif
 
   int l, last;

Singular/mod2.h.in

@@ -6 +6 @@
  *          DO NOT EDIT!
  *
- *  Version: $Id: mod2.h.in,v 1.124 2007-12-18 09:56:57 Singular Exp $
+ *  Version: $Id: mod2.h.in,v 1.125 2008-02-06 20:22:41 wienand Exp $
  *******************************************************************/
 #ifndef MOD2_H
 #define MOD2_H
+#define HAVE_RINGS
+#define HAVE_RING2TOM
+#define HAVE_RINGMODN
+#define HAVE_RINGZ
 
 /*******************************************************************