Changeset 18ef40 in git for kernel/kutil.cc

Timestamp:

Dec 8, 2008, 11:00:44 AM (15 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

6b84331e2b20793ec5e9a095f67e337bc2a04e8b

Parents:

8d14d6727730a17792390dffc7ccbaa20400a1d9

Message:

mea culpa


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

File:

• kernel/kutil.cc (modified) (4 diffs)

kernel/kutil.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.cc,v 1.113 2008-12-04 14:13:37 wienand Exp $ */
+/* $Id: kutil.cc,v 1.114 2008-12-08 10:00:44 wienand Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -315 +315 @@
   poly p = L->GetLmTailRing();
 
-#ifdef HAVE_RINGS
+#ifdef HAVE_RINGS_LOC
   // Leading coef have to be a unit
   if ( !(nIsUnit(p_GetCoeff(p, r))) ) return;
@@ -5091 +5091 @@
   if (!pIsVector((*p).p) && ((*p).ecart != 0))
   {
-#ifdef HAVE_RINGS
+#ifdef HAVE_RINGS_LOC
     // Leading coef have to be a unit
     if ( !(nIsUnit(p_GetCoeff((*p).p, r))) ) return;
@@ -5106 +5106 @@
         (*p).ecart = 0;
         (*p).length = 1;
-#ifdef HAVE_RINGS
+#ifdef HAVE_RINGS_LOC
         (*p).pLength = 1;  // Why wasn't this set already?
 #endif