From: Vincent Hanquez Date: Wed, 12 Aug 2009 14:55:16 +0000 (+0100) Subject: add a need_threading for tasks to represent the tasks that need to be running in... X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=4470dbfab39c4bb9ee6867516742a4bfe100401a;p=xenclient%2Ftoolstack.git add a need_threading for tasks to represent the tasks that need to be running in a thread --- diff --git a/xenvm/tasks.ml b/xenvm/tasks.ml index 1621cdd..7a84146 100644 --- a/xenvm/tasks.ml +++ b/xenvm/tasks.ml @@ -65,11 +65,12 @@ type task_descr = { name: string; description: string; (* vmstate: ;*) + need_threading: bool; args: (string * argreq * argty) list; (* name, required, type *) } -let mk_desc name = { name = name; description = ""; args = [] } -let mk_desc_args name args = { name = name; description = ""; args = args } +let mk_desc name = { name = name; description = ""; need_threading = false; args = [] } +let mk_desc_args name args = { name = name; description = ""; need_threading = false; args = args } let actions_table = [ (Quit, mk_desc "quit");