Commit c2e26859 authored by Guido van Rossum's avatar Guido van Rossum

Reorganized somewhat to make it really work on Think C.

Hope the best for MPW 3.
parent 6c0d5a69
...@@ -25,6 +25,9 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. ...@@ -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() ...@@ -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() ...@@ -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() ...@@ -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) {
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment