/* -----------------------------------------------------------------------------
- * $Id: Select.c,v 1.16 2001/02/28 14:23:55 sewardj Exp $
+ * $Id: Select.c,v 1.19 2001/11/13 13:38:02 simonmar Exp $
*
* (c) The GHC Team 1995-1999
*
* ---------------------------------------------------------------------------*/
/* we're outside the realms of POSIX here... */
-#define NON_POSIX_SOURCE
+/* #include "PosixSource.h" */
#include "Rts.h"
#include "Schedule.h"
/* last timestamp */
nat timestamp = 0;
-/* keep track of the number of ticks since we last called
- * gettimeofday(), to avoid having to call it every time we need
- * a timestamp.
- */
-nat ticks_since_timestamp = 0;
-
/* There's a clever trick here to avoid problems when the time wraps
* around. Since our maximum delay is smaller than 31 bits of ticks
* (it's actually 31 bits of microseconds), we can safely check
do {
ticks = timestamp = getourtimeofday();
- ticks_since_timestamp = 0;
if (wakeUpSleepingThreads(ticks)) {
return;
}
*/
if (signals_pending()) {
RELEASE_LOCK(&sched_mutex); /* ToDo: kill */
- start_signal_handlers();
+ startSignalHandlers();
ACQUIRE_LOCK(&sched_mutex);
return; /* still hold the lock */
}