===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/poly2.c,v
retrieving revision 1.5
retrieving revision 1.8
diff -u -p -r1.5 -r1.8
--- OpenXM/src/kan96xx/Kan/poly2.c	2003/08/21 02:30:23	1.5
+++ OpenXM/src/kan96xx/Kan/poly2.c	2020/10/06 11:33:46	1.8
@@ -1,5 +1,6 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/poly2.c,v 1.4 2003/08/20 01:39:17 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/poly2.c,v 1.7 2005/07/03 11:08:54 ohara Exp $ */
 #include <stdio.h>
+#include <stdlib.h>
 #include "datatype.h"
 #include "stackm.h"
 #include "extern.h"
@@ -694,7 +695,7 @@ POLY modulo0(f,ringp)
 struct object test(ob)  /* test3 */
 	 struct object ob;
 {
-  struct object rob;
+  struct object rob = OINIT;
   int k;
   static POLY f0;
   static POLY f1;
@@ -1007,7 +1008,7 @@ struct coeff *gcdOfCoeff(POLY f) {
 }
 
 int shouldReduceContent(POLY f,int ss) {
-  extern DoCancel;
+  extern int DoCancel;
   static int prevSize = 1;
   int size;
   if (f == POLYNULL) return 0;