Changeset 5eb865 in git for kernel/kInline.cc

Timestamp:

Jun 9, 2009, 8:21:50 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'd0474371d8c5d8068ab70bfb42719c97936b18a6')

Children:

e4be351ada16eebdaa1e48ce01115ffc5287dbd3

Parents:

b82abb0dc3349df20acd8231f648b8ff51bc61b6

Message:

*hannes: redtail for Z


git-svn-id: file:///usr/local/Singular/svn/trunk@11891 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.15 2009-03-18 16:56:02 Singular Exp $
+ *  Version: $Id: kInline.cc,v 1.16 2009-06-09 18:21:50 Singular Exp $
  *******************************************************************/
 #ifndef KINLINE_CC
@@ -1086 +1086 @@
 }
 
+#ifdef HAVE_RINGS
+KINLINE poly redtailBba_Z (poly p,int pos,kStrategy strat)
+{
+  LObject L(p, currRing, strat->tailRing);
+  return redtailBba_Z(&L, pos, strat);
+}
+#endif
+
 KINLINE poly redtailBba(TObject *T, int pos,kStrategy strat)
 {