Subversion Repositories shark

Compare Revisions

Ignore whitespace Rev 915 → Rev 916

/shark/trunk/kernel/event.c
18,11 → 18,11
 
/**
------------
CVS : $Id: event.c,v 1.2 2003-01-07 17:07:49 pj Exp $
CVS : $Id: event.c,v 1.3 2005-01-08 14:45:23 pj Exp $
 
File: $File$
Revision: $Revision: 1.2 $
Last update: $Date: 2003-01-07 17:07:49 $
Revision: $Revision: 1.3 $
Last update: $Date: 2005-01-08 14:45:23 $
------------
 
This file contains the functions to be used into events:
88,13 → 88,12
 
/* some static functions ...*/
 
int event_noreschedule = 0;
 
/*+ used to call the scheduler at the end of an event list +*/
static void reschedule(void)
{
/* we have to change context ONLY IF the sys_end primitive was not called
before (e.g., in a exception raise called by a task_epilogue called by
the scheduler. */
if (!mustexit) {
if (!event_noreschedule) {
scheduler();
ll_context_to(proc_table[exec_shadow].context);
}