haskell-effectful/effectful
1
1
Fork 0
mirror of https://github.com/haskell-effectful/effectful.git synced 2024-11-23 14:36:11 +03:00
Code Issues Projects Releases Wiki Activity

Name fields of Env for clarity

Browse Source
This commit is contained in:
Andrzej Rybczak 2021-06-22 00:22:28 +02:00
parent 7975895c8c
commit 3a69865217
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Effectful/Internal/Env.hs
View File

@ -57,7 +57,11 @@ type role Env nominal
--
-- - Modification of a specific element: /O(forks)/, usually /O(1)/.
--
data Env (es :: [Effect]) = Env Forks (IORef EnvRef) UniqueGen
data Env (es :: [Effect]) = Env
{ _forks :: Forks
, _globalRef :: IORef EnvRef
, _uniqueGen :: UniqueGen
}
-- | Local forks of the environment.
data Forks = Forks {-# UNPACK #-} ForkId (IORef EnvRef) Forks | NoFork