let init () = if Sys.os_type = "Unix" then OUnitRunner.register "processes" 100 (runner create_worker workers_waiting)