OpenXM/src/kan96xx/Kan/option.c - diff

Return to option.c CVS log

Up to [local] / OpenXM / src / kan96xx / Kan

version 1.18, 2011/10/05 05:46:14

version 1.20, 2016/03/31 05:27:34

Line 1

/* $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.19 2016/03/31 03:22:54 takayama Exp $ */

#include <stdio.h>

#include "datatype.h"

#include "stackm.h"

Line 7

#include "kclass.h"

#include "lookup.h"

#include <signal.h>

#include "mysig.h"

extern void ctrlC();

Line 283 struct object KsystemVariable(ob)

Line 284 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);

if (SigIgn) mysignal(SIGINT,SIG_IGN);

else signal(SIGINT,ctrlC);

else mysignal(SIGINT,ctrlC);

rob = KpoInteger(SigIgn);

}else if (strcmp(ob1.lc.str,"KSPushEnvMode") == 0) {

KSPushEnvMode = ob2.lc.ival;