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.

diff --git a/mac/ChangeLog b/mac/ChangeLog
index fd259a54609bad8c1c869305f79be4ca300beb4f..1ae1c7fdca86294200ca83d2cebc46df685b20d1 100644 (file)
--- 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 0aaad884f6d52e49a4d2e196823421c67059b24d..d0c9d1a36c39d2399f04807fde3e4f0614d3c05c 100644 (file)
--- 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);
 }