sig
  type 'a fork_point
  type 'a join_point
  val def_process :
    ('a -> 'b) ->
    'a Netmcore_process.fork_point * 'b Netmcore_process.join_point
  val start :
    ?inherit_resources:Netmcore.inherit_request ->
    'a Netmcore_process.fork_point -> 'a -> Netmcore.process_id
  val join :
    'a Netmcore_process.join_point -> Netmcore.process_id -> 'a option
  val release_fork_point : 'a Netmcore_process.fork_point -> unit
  val release_join_point : 'a Netmcore_process.join_point -> unit
end