Changeset 609334 in git for kernel/polys1.cc

Timestamp:

Feb 26, 2009, 12:14:16 PM (15 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

3a852046e44ceaad99faf50863adfab42f049b2c

Parents:

61944d0a0689203f1f85c43b1610be266ec31371

Message:

*levandov: working on pContentRat


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

File:

• kernel/polys1.cc (modified) (3 diffs)

kernel/polys1.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys1.cc,v 1.32 2008-07-25 14:37:55 Singular Exp $ */
+/* $Id: polys1.cc,v 1.33 2009-02-26 11:14:16 levandov Exp $ */
 
 /*
@@ -26 +26 @@
 #ifdef HAVE_FACTORY
 #include "clapsing.h"
+#endif
+
+#ifdef HAVE_RATGRING
+#include "ratgring.h"
 #endif
 
@@ -1048 +1052 @@
     }
     if (h!=NULL) nDelete(&h);
-    pContent(ph);
+  
+#ifdef HAVE_RATGRING
+    if (rIsRatGRing(currRing))
+    {
+      pContentRat(ph);
+    }
+    else
+#endif
+      pContent(ph);
   }
 }