X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/dd53c45e8a85975bf310ba5ab4d70b1ff493baac..41058fa2ad8d53bfb3dfcbbb286665cd52f3cf62:/src/simix/smx_context_ruby.c diff --git a/src/simix/smx_context_ruby.c b/src/simix/smx_context_ruby.c index f78102046a..07739f5939 100644 --- a/src/simix/smx_context_ruby.c +++ b/src/simix/smx_context_ruby.c @@ -23,7 +23,7 @@ smx_ctx_ruby_create_context(xbt_main_func_t code, int argc, char **argv, static void smx_ctx_ruby_stop(smx_context_t context); static void smx_ctx_ruby_suspend(smx_context_t context); static void smx_ctx_ruby_resume(smx_context_t new_context); -static void smx_ctx_ruby_runall(xbt_swag_t processes); +static void smx_ctx_ruby_runall(xbt_dynar_t processes); void SIMIX_ctx_ruby_factory_init(smx_context_factory_t * factory) { @@ -55,7 +55,7 @@ smx_ctx_ruby_create_context(xbt_main_func_t code, int argc, char **argv, if (code) { context->process = (VALUE) code; - DEBUG1("smx_ctx_ruby_create_context(%s)...Done", argv[0]); + XBT_DEBUG("smx_ctx_ruby_create_context(%s)...Done", argv[0]); } return (smx_context_t) context; @@ -63,7 +63,7 @@ smx_ctx_ruby_create_context(xbt_main_func_t code, int argc, char **argv, static void smx_ctx_ruby_stop(smx_context_t context) { - DEBUG0("smx_ctx_ruby_stop()"); + XBT_DEBUG("smx_ctx_ruby_stop()"); VALUE process = Qnil; smx_ctx_ruby_t ctx_ruby, current; @@ -95,7 +95,7 @@ static void smx_ctx_ruby_stop(smx_context_t context) static void smx_ctx_ruby_suspend(smx_context_t context) { - DEBUG1("smx_ctx_ruby_suspend(%s)", context->argv[0]); + XBT_DEBUG("smx_ctx_ruby_suspend(%s)", context->argv[0]); smx_ctx_ruby_t ctx_ruby = (smx_ctx_ruby_t) context; if (ctx_ruby->process) rb_process_unschedule(ctx_ruby->process); @@ -103,21 +103,24 @@ static void smx_ctx_ruby_suspend(smx_context_t context) static void smx_ctx_ruby_resume(smx_context_t new_context) { - DEBUG1("smx_ctx_ruby_resume(%s)", + XBT_DEBUG("smx_ctx_ruby_resume(%s)", (new_context->argc ? new_context->argv[0] : "maestro")); smx_ctx_ruby_t ctx_ruby = (smx_ctx_ruby_t) new_context; rb_process_schedule(ctx_ruby->process); } -static void smx_ctx_ruby_runall(xbt_swag_t processes) +static void smx_ctx_ruby_runall(xbt_dynar_t processes) { smx_process_t process; smx_context_t old_context; - while ((process = xbt_swag_extract(processes))) { + unsigned int cursor; + + xbt_dynar_foreach(processes, cursor, process) { old_context = smx_current_context; smx_current_context = process->context; smx_ctx_ruby_resume(smx_current_context); smx_current_context = old_context; - } + } + xbt_dynar_reset(processes); }