Only go into eventloop/interrupt check 10 times per second
diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c
index e2ca494..6fc1e99 100644
--- a/Mac/Python/macglue.c
+++ b/Mac/Python/macglue.c
@@ -351,11 +351,20 @@
}
}
+#define TICKCOUNT 6
+
int
PyOS_InterruptOccurred()
{
+ static unsigned long nextticktime;
+ unsigned long curticktime;
+
if (PyMac_DoYieldEnabled < 0)
return 0;
+ curticktime = (unsigned long)LMGetTicks();
+ if ( curticktime < nextticktime )
+ return 0;
+ nextticktime = curticktime + TICKCOUNT;
#ifdef THINK_C
scan_event_queue(1);
#endif