1
1
mirror of https://github.com/github/semantic.git synced 2024-12-23 06:41:45 +03:00

Delegate the analysis of terms to the underlying analysis.

This commit is contained in:
Rob Rix 2018-03-07 21:20:16 -05:00
parent 271f3fb786
commit 5749c50302

View File

@ -71,4 +71,4 @@ instance ( Corecursive (TermFor m)
=> MonadAnalysis (DeadCodeAnalysis m) where
analyzeTerm term = do
revive (embedSubterm term)
DeadCodeAnalysis (analyzeTerm (second runDeadCodeAnalysis <$> term))
delegateAnalyzeTerm term