1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00

📝 evCache.

This commit is contained in:
Rob Rix 2017-12-21 14:55:21 -05:00
parent 3331746591
commit 01598e70c9

View File

@ -75,6 +75,7 @@ evalCache :: forall v term
evalCache e = run @(CachingInterpreter term v) (fixCache (fix (evCache (evCollect (\ recur yield -> eval recur yield . project)))) pure e) evalCache e = run @(CachingInterpreter term v) (fixCache (fix (evCache (evCollect (\ recur yield -> eval recur yield . project)))) pure e)
-- | Evaluation of a single iteration of an analysis, given a 'MonadCacheIn' instance as an oracle for results and a 'MonadCacheOut' instance to record computed results in.
evCache :: forall t v m evCache :: forall t v m
. ( Ord (LocationFor v) . ( Ord (LocationFor v)
, Ord t , Ord t