===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/parser.c,v
retrieving revision 1.7
retrieving revision 1.10
diff -u -p -r1.7 -r1.10
--- OpenXM/src/kan96xx/Kan/parser.c	2004/09/17 02:42:57	1.7
+++ OpenXM/src/kan96xx/Kan/parser.c	2015/09/27 08:12:42	1.10
@@ -1,15 +1,21 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/parser.c,v 1.6 2004/05/13 10:37:30 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/parser.c,v 1.9 2005/07/03 11:08:54 ohara Exp $ */
 /*
   parser.c   parser for poly.c
 */
 
 #include <stdio.h>
+#include <string.h>
 #include "datatype.h"
 #include "setjmp.h"
 #include "stackm.h"
 #include "extern.h"
 #include "extern2.h"
 
+#if defined(__MSYS__)
+#define setjmp(e) _setjmp(e)
+#define sigsetjmp(e,n) _setjmp(e)
+#endif
+
 #define NUM  1       /* NUM means struct Bignum */
 #define POL  0
 
@@ -486,7 +492,7 @@ static void factor() {
 
 static void monom() {
   union valObject utmp;
-  struct object obj;
+  struct object obj = OINIT;
   POLY f;
   extern struct context *CurrentContextp;
   if (Symbol == 'x' || Symbol == 'd') {