===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/red.c,v
retrieving revision 1.9
retrieving revision 1.11
diff -u -p -r1.9 -r1.11
--- OpenXM/src/kan96xx/Kan/red.c	2004/09/13 11:24:11	1.9
+++ OpenXM/src/kan96xx/Kan/red.c	2020/10/06 11:33:47	1.11
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/red.c,v 1.8 2003/09/12 02:52:50 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/red.c,v 1.10 2005/06/09 04:09:22 takayama Exp $ */
 #include <stdio.h>
 #include "datatype.h"
 #include "extern2.h"
@@ -10,6 +10,12 @@ int DebugReductionRed = 0;
 int DebugContentReduction = 0;
 extern int Sugar;
 
+struct spValue spZero(void) {
+  struct spValue r;
+  r.a = ZERO;
+  r.b = ZERO;
+  return r;
+}
 struct spValue sp_gen(f,g)
      POLY f;
      POLY g;
@@ -215,7 +221,7 @@ POLY reduction1_gen(f,g,needSyz,c,h)
   struct ring *rp;
   struct spValue sv;
   POLY f2;
-  extern DoCancel;
+  extern int DoCancel;
   static int crcount=0;
   
   if (needSyz) {
@@ -350,7 +356,7 @@ POLY reduction_gen(f,gset,needSyz,syzp)
 
   extern struct ring *CurrentRingp;
   struct ring *rp;
-  extern DoCancel;
+  extern int DoCancel;
   
   if (needSyz) {
     if (f ISZERO) { rp = CurrentRingp; } else { rp = f->m->ringp; }