===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/primitive.c,v
retrieving revision 1.20
retrieving revision 1.24
diff -u -p -r1.20 -r1.24
--- OpenXM/src/kan96xx/Kan/primitive.c	2005/06/16 05:07:23	1.20
+++ OpenXM/src/kan96xx/Kan/primitive.c	2016/03/31 05:27:34	1.24
@@ -1,16 +1,20 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.19 2004/09/20 02:11:22 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/primitive.c,v 1.23 2016/03/31 03:22:54 takayama Exp $ */
 /*   primitive.c */
 /*  The functions in this module were in stackmachine.c */
 
 #include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
 #include <signal.h>
 #include "datatype.h"
 #include "stackm.h"
 #include "extern.h"
+#include "extern2.h"
 #include "gradedset.h"
 #include "kclass.h"
 #include <sys/types.h>
 #include <sys/times.h>
+#include "mysig.h"
 
 int PrintDollar = 1;         /* flag for printObject() */
 int PrintComma  = 1;         /* flag for printObject() */
@@ -1743,7 +1747,7 @@ int executePrimitive(ob) 
     }
 	n = ob2.lc.ival;
 	if (n > 0) {
-	  signal(SIGALRM,ctrlC); alarm((unsigned int) n);
+	  mysignal(SIGALRM,ctrlC); alarm((unsigned int) n);
       status = executeExecutableArray(ob1,(char *)NULL,0);
 	  cancelAlarm();
 	}else{