sys.check_interval=x -> sys.setcheckinterval(x)

diff --git a/Include/sysmodule.h b/Include/sysmodule.h
index 46d0070d66ef773054d324f3a909c8928db8852f..1f1589af580b3e4840a59c1eaf310ad30c9d697d 100644 (file)
--- a/Include/sysmodule.h
+++ b/Include/sysmodule.h
@@ -36,6 +36,7 @@ FILE *sysgetfile PROTO((char *, FILE *));
 void initsys PROTO((void));
 
 extern DL_IMPORT object *sys_trace, *sys_profile;
+extern DL_IMPORT int sys_checkinterval;
 
 #ifdef __cplusplus
 }

diff --git a/Python/sysmodule.c b/Python/sysmodule.c
index ea673639158acb45737ebf15bc43a25f84903a4b..5d7955bf3bf81808de0e5c1daab6613cd74d5815 100644 (file)
--- a/Python/sysmodule.c
+++ b/Python/sysmodule.c
@@ -45,6 +45,7 @@ Data members:
 #include "osdefs.h"
 
 object *sys_trace, *sys_profile;
+int sys_checkinterval;
 
 static object *sysdict;
 
@@ -124,6 +125,17 @@ sys_setprofile(self, args)
        return None;
 }
 
+static object *
+sys_setcheckinterval(self, args)
+       object *self;
+       object *args;
+{
+       if (!newgetargs(args, "i", &sys_checkinterval))
+               return NULL;
+       INCREF(None);
+       return None;
+}
+
 #ifdef USE_MALLOPT
 /* Link with -lmalloc (or -lmpc) on an SGI */
 #include <malloc.h>
@@ -149,6 +161,7 @@ static struct methodlist sys_methods[] = {
 #endif
        {"setprofile",  sys_setprofile},
        {"settrace",    sys_settrace},
+       {"setcheckinterval",    sys_setcheckinterval},
        {NULL,          NULL}           /* sentinel */
 };