=================================================================== RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/option.c,v retrieving revision 1.18 retrieving revision 1.21 diff -u -p -r1.18 -r1.21 --- OpenXM/src/kan96xx/Kan/option.c 2011/10/05 05:46:14 1.18 +++ OpenXM/src/kan96xx/Kan/option.c 2020/10/06 11:33:46 1.21 @@ -1,5 +1,6 @@ -/* $OpenXM: OpenXM/src/kan96xx/Kan/option.c,v 1.17 2006/12/21 05:29:49 takayama Exp $ */ +/* $OpenXM: OpenXM/src/kan96xx/Kan/option.c,v 1.20 2016/03/31 05:27:34 takayama Exp $ */ #include +#include #include "datatype.h" #include "stackm.h" #include "extern.h" @@ -7,8 +8,10 @@ #include "kclass.h" #include "lookup.h" #include +#include "mysig.h" extern void ctrlC(); +void warningOption(char *str); struct object KsystemVariable(ob) @@ -283,8 +286,8 @@ struct object KsystemVariable(ob) rob = KpoInteger(Strict2); }else if (strcmp(ob1.lc.str,"SigIgn") == 0) { SigIgn = ob2.lc.ival; - if (SigIgn) signal(SIGINT,SIG_IGN); - else signal(SIGINT,ctrlC); + if (SigIgn) mysignal(SIGINT,SIG_IGN); + else mysignal(SIGINT,ctrlC); rob = KpoInteger(SigIgn); }else if (strcmp(ob1.lc.str,"KSPushEnvMode") == 0) { KSPushEnvMode = ob2.lc.ival; @@ -465,7 +468,7 @@ struct object KsystemVariable(ob) return(rob); } -warningOption(str) +void warningOption(str) char *str; { fprintf(stderr,"Warning(option.c): %s\n",str);