Mirror
/
cpython
mirror of https://github.com/python/cpython
4
1
Fork 0
Code Issues Releases Wiki Activity

Reorganized somewhat to make it really work on Think C. 

Hope the best for MPW 3.
This commit is contained in:
Guido van Rossum 1991-07-01 18:46:03 +00:00
parent 49955ae360
commit 1055ecebee
1 changed files with 5 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
Parser/intrcheck.c
View File

@ -25,6 +25,9 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
/* Check for interrupts */ /* Check for interrupts */
#ifdef THINK_C #ifdef THINK_C
/* This is for THINK C 4.0.
For 3.0, you may have to remove the signal stuff. */
#include <MacHeaders>
#define macintosh #define macintosh
#endif #endif
@ -56,13 +59,7 @@ intrcheck()
#ifdef macintosh #ifdef macintosh
#ifdef THINK_C #ifdef applec /* MPW */
/* This is for THINK C 4.0.
For 3.0, you may have to remove the signal stuff. */
#include <MacHeaders>
#else
/* This is for MPW 3.1 */
/* XXX Untested */
#include <OSEvents.h> #include <OSEvents.h>
#include <SysEqu.h> #include <SysEqu.h>
#endif #endif
@ -73,7 +70,7 @@ intrcheck()
static int interrupted; static int interrupted;
static SIGTYPE static SIGTYPE
intcatcher(ig) intcatcher(sig)
int sig; int sig;
{ {
interrupted = 1; interrupted = 1;
@ -92,8 +89,6 @@ intrcheck()
{ {
register EvQElPtr q; register EvQElPtr q;
/* This is like THINK C 4.0's <console.h> */
/* q = (EvQElPtr) EventQueue.qHead; */
q = (EvQElPtr) GetEvQHdr()->qHead; q = (EvQElPtr) GetEvQHdr()->qHead;
for (; q; q = (EvQElPtr)q->qLink) { for (; q; q = (EvQElPtr)q->qLink) {