Fiber-local storage.
This storage is associated to the current fiber, just like thread-local storage is associated with the current thread.
See Moonpool.Task_local_storage for more general information, as this is based on it.
NOTE: it's important to note that, while each fiber has its own storage, spawning a sub-fiber f2 from a fiber f1 will only do a shallow copy of the storage. Values inside f1's storage will be physically shared with f2. It is thus recommended to store only persistent values in the local storage.
include module type of struct include Moonpool.Task_local_storage endtype 'a t = 'a Picos.Fiber.FLS.tval create : unit -> 'a tcreate () makes a new key. Keys are expensive and should never be allocated dynamically or in a loop.
val get_exn : 'a t -> 'aget k gets the value for the current task for key k. Must be run from inside a task running on a runner.
val get_opt : 'a t -> 'a optionget_opt k gets the current task's value for key k, or None if not run from inside the task.
val get : 'a t -> default:'a -> 'aval set : 'a t -> 'a -> unitset k v sets the storage for k to v. Must be run from inside a task running on a runner.
val with_value : 'a t -> 'a -> (unit -> 'b) -> 'bwith_value k v f sets k to v for the duration of the call to f(). When f() returns (or fails), k is restored to its old value.
Hmap.tThis requires hmap to be installed.