From da9274502cf796d52a9875e4c9f650b53901ad73 Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Thu, 4 Nov 1999 08:01:25 +0000 Subject: Incremental Mac integration from Matthias. p4raw-id: //depot/cfgperl@4512 --- run.c | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) (limited to 'run.c') diff --git a/run.c b/run.c index cd831cb4ad..5734fdb18f 100644 --- a/run.c +++ b/run.c @@ -23,9 +23,7 @@ Perl_runops_standard(pTHX) dTHR; while ( PL_op = CALL_FPTR(PL_op->op_ppaddr)(aTHX) ) { -#ifdef MACOS_TRADITIONAL - MACPERL_DO_ASYNC_TASKS(); -#endif + PERL_ASYNC_CHECK(); } TAINT_NOT; @@ -44,9 +42,7 @@ Perl_runops_debug(pTHX) } do { -#ifdef MACOS_TRADITIONAL - MACPERL_DO_ASYNC_TASKS(); -#endif + PERL_ASYNC_CHECK(); if (PL_debug) { if (PL_watchaddr != 0 && *PL_watchaddr != PL_watchok) PerlIO_printf(Perl_debug_log, -- cgit v1.2.1