package granary

  1. Overview
  2. Docs
package granary
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file parallel.ml

1
2
let available () = Domain.recommended_domain_count () > 1
let run ~parallel ~sequential = if available () then parallel () else sequential ()