PhyloCSF/ForkYes.ml at master · mlin/PhyloCSF · GitHub

Fetching contributors…

Cannot retrieve contributors at this time

Raw Blame History

9 lines (6 sloc) 167 Bytes

	open Batteries

	let can_fork = true

	let map ?(procs=1) f lst =
	if procs=1 \|\| List.length lst = 1 then List.map f lst
	else
	ForkWork.map_list ~maxprocs:procs f lst

You can't perform that action at this time.