mirror of
https://github.com/github/semantic.git
synced 2025-01-02 20:41:38 +03:00
📝 reset.
This commit is contained in:
parent
3dd34f2a12
commit
9cac249c84
@ -15,6 +15,8 @@ data Fresh a where
|
||||
class Monad m => MonadFresh m where
|
||||
-- | Get a fresh variable name, guaranteed unused (since the last 'reset').
|
||||
fresh :: m TName
|
||||
|
||||
-- | Reset the sequence of variable names. Useful to avoid complicated alpha-equivalence comparisons when iteratively recomputing the results of an analysis til convergence.
|
||||
reset :: TName -> m ()
|
||||
|
||||
instance (Fresh :< fs) => MonadFresh (Eff fs) where
|
||||
|
Loading…
Reference in New Issue
Block a user