mirror of
https://github.com/github/semantic.git
synced 2024-12-22 14:21:31 +03:00
Specialize evaluateModule.
This commit is contained in:
parent
ae4e17911c
commit
55abf44b16
@ -12,6 +12,7 @@ import Algebra.Graph.Class
|
||||
import Algebra.Graph.Export.Dot
|
||||
import Control.Abstract.Analysis
|
||||
import Data.Abstract.FreeVariables
|
||||
import Data.Abstract.Module
|
||||
import Data.Set (member)
|
||||
import qualified Data.Syntax as Syntax
|
||||
import qualified Data.Syntax.Declaration as Declaration
|
||||
@ -46,6 +47,8 @@ instance MonadAnalysis term value (m term value effects) => MonadAnalysis term v
|
||||
|
||||
analyzeTerm = liftAnalyze analyzeTerm
|
||||
|
||||
evaluateModule m@Module{..} = ImportGraphing (evaluateModule m)
|
||||
|
||||
|
||||
-- | Types which contribute to a 'ImportGraph'. There is exactly one instance of this typeclass; customizing the 'ImportGraph's for a new type is done by defining an instance of 'CustomImportGraphAlgebra' instead.
|
||||
--
|
||||
|
Loading…
Reference in New Issue
Block a user