Changeset c6512c in git

Timestamp:

Mar 30, 2009, 11:03:08 AM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

471d0cfd4f2ba1de169f289e92eec0f0d189bc9e

Parents:

e908810c8dd426652b64941fd24e8b2008c9393d

Message:

*hannes: charstr.cc


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

File:

• kernel/ring.cc (modified) (2 diffs)

kernel/ring.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ring.cc,v 1.114 2009-02-13 09:15:41 Singular Exp $ */
+/* $Id: ring.cc,v 1.115 2009-03-30 09:03:08 Singular Exp $ */
 
 /*
@@ -635 +635 @@
 
 #ifdef HAVE_RINGS
-  if (rField_is_Ring(r))
-  {
-    s=omStrDup("coefficient ring");                   /* Z */
+  if (rField_is_Ring_Z(r))
+  {
+    s=omStrDup("integer");                   /* Z */
     return s;
+  }
+  if(rField_is_Ring_2toM(r))
+  {
+    return omStrDup("coefficient ring");
+  }
+  if(rField_is_Ring_ModN(r))
+  {
+    return omStrDup("coefficient ring");
+  }
+  if(rField_is_Ring_PtoM(r))
+  {
+    return omStrDup("coefficient ring");
   }
 #endif