Changeset d0207e9 in git for kernel/kInline.cc

Timestamp:

Feb 26, 2009, 3:23:07 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

4751d7a7e4db5fb6ec994a889d43d7f78013fbfa

Parents:

b8cf6c7396a74cf9f5eaabb53c4e78e2f9675873

Message:

*hannes: pCleardenom may change p


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

File:

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

kernel/kInline.cc

@@ -7 +7 @@
  *  Author:  obachman (Olaf Bachmann)
  *  Created: 8/00
- *  Version: $Id: kInline.cc,v 1.12 2009-02-21 14:11:06 Singular Exp $
+ *  Version: $Id: kInline.cc,v 1.13 2009-02-26 14:22:38 Singular Exp $
  *******************************************************************/
 #ifndef KINLINE_CC
@@ -418 +418 @@
 {
   assume(p != NULL);
+  #ifdef HAVE_RATGRING
+  p= ::pCleardenom(p);
+  #else
   ::pCleardenom(p);
+  #endif
   if (t_p != NULL)
     pSetCoeff0(t_p, pGetCoeff(p));