mirror of
https://github.com/github/semantic.git
synced 2024-12-26 00:12:29 +03:00
Merge branch 'evaluator-dsl' into evaluate-closures-without-terms
This commit is contained in:
commit
5a4e6cb0b0
@ -3,7 +3,6 @@ module Control.Abstract.Evaluator.Spec where
|
|||||||
|
|
||||||
import Analysis.Abstract.Evaluating (evaluating)
|
import Analysis.Abstract.Evaluating (evaluating)
|
||||||
import Control.Abstract
|
import Control.Abstract
|
||||||
import Control.Monad.Effect (runM)
|
|
||||||
import Data.Abstract.Module
|
import Data.Abstract.Module
|
||||||
import qualified Data.Abstract.Number as Number
|
import qualified Data.Abstract.Number as Number
|
||||||
import Data.Abstract.Package
|
import Data.Abstract.Package
|
||||||
@ -29,7 +28,6 @@ spec = parallel $ do
|
|||||||
|
|
||||||
evaluate
|
evaluate
|
||||||
= runM
|
= runM
|
||||||
. lower
|
|
||||||
. fmap (first reassociate)
|
. fmap (first reassociate)
|
||||||
. evaluating
|
. evaluating
|
||||||
. runReader (PackageInfo (name "test") Nothing)
|
. runReader (PackageInfo (name "test") Nothing)
|
||||||
|
Loading…
Reference in New Issue
Block a user