2001-09-04 Andrew Choi <akochoi@cse.cuhk.edu.hk>

	* src/mac.c (sleep) [__MRC__]: Place loop around WaitNextEvent
	to check time elapsed instead of use WaitNextEvent call as a delay.

2 files changed, 10 insertions, 2 deletions

diff --git a/mac/ChangeLog b/mac/ChangeLog
index fd259a54609..1ae1c7fdca8 100644
--- a/mac/ChangeLog
+++ b/mac/ChangeLog
@@ -9,7 +9,9 @@
         * src/mac.c (stat): Don't fail for aliases.
         (sys_open) [__MRC__]: Set file creator and type for newly-created
         files.
-
+        (sleep) [__MRC__]: Place loop around WaitNextEvent to check time
+        elapsed instead of use WaitNextEvent call as a delay.
+        
 2001-08-24  Andrew Choi  <akochoi@cse.cuhk.edu.hk>
 
         * src/macterm.c (init_font_name_table): Add an additional entry to
diff --git a/mac/src/mac.c b/mac/src/mac.c
index 0aaad884f6d..d0c9d1a36c3 100644
--- a/mac/src/mac.c
+++ b/mac/src/mac.c
@@ -969,9 +969,15 @@ gettimeofday (tp)
 unsigned int
 sleep (unsigned int seconds)
 {
+  unsigned long time_up;
   EventRecord e;
 
-  WaitNextEvent (0, &e, seconds * 60UL, NULL);  /* Accept no event; just wait. by T.I.*/
+  time_up = TickCount () + seconds * 60;
+  while (TickCount () < time_up)
+    {
+      /* Accept no event; just wait. by T.I.  */
+      WaitNextEvent (0, &e, 30, NULL);
+    }
 
   return (0);
 }