github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-24 23:42:31 +03:00
Code Issues Projects Releases Wiki Activity

Use OverloadedLists here

Browse Source
This commit is contained in:
Timothy Clem 2018-03-19 14:53:47 -07:00
parent 31f7746c26
commit 8522af6492
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
test/Analysis/PHP/Spec.hs
View File

@ -1,3 +1,4 @@
{-# LANGUAGE OverloadedLists #-}
module Analysis.PHP.Spec (spec) where
import Data.Abstract.Value
@ -11,9 +12,7 @@ spec = parallel $ do
describe "evalutes PHP" $ do
it "include" $ do
env <- evaluate "main.php"
let expectedEnv = Environment $ fromList
[ (qualifiedName ["foo"], addr 0)
]
let expectedEnv = [ (qualifiedName ["foo"], addr 0) ]
env `shouldBe` expectedEnv
where