mirror of
https://github.com/github/semantic.git
synced 2024-12-26 00:12:29 +03:00
Define 'analyzeTerm' for 'CachingAnalysis'.
This commit is contained in:
parent
76c69dce45
commit
ca32bdc551
@ -80,7 +80,7 @@ instance ( Corecursive t
|
||||
, Semigroup (Cell (LocationFor v) v)
|
||||
)
|
||||
=> MonadAnalysis t v (CachingAnalysis t v) where
|
||||
evaluateTerm = foldSubterms $ \e -> do
|
||||
analyzeTerm e = do
|
||||
c <- getConfiguration (embedSubterm e)
|
||||
-- Convergence here is predicated upon an Eq instance, not α-equivalence
|
||||
cache <- converge (\ prevCache -> do
|
||||
|
Loading…
Reference in New Issue
Block a user