mirror of
https://github.com/github/semantic.git
synced 2024-12-25 16:02:43 +03:00
fix test
This commit is contained in:
parent
745eb85ee7
commit
b1efc533cf
@ -30,11 +30,11 @@ spec = parallel $ do
|
|||||||
|
|
||||||
it "subclass" $ do
|
it "subclass" $ do
|
||||||
res <- evaluate' "subclass.rb"
|
res <- evaluate' "subclass.rb"
|
||||||
join (fst res) `shouldBe` Right (injValue (String "\"<bar>\""))
|
fst res `shouldBe` Right (Right (injValue (String "\"<bar>\"")))
|
||||||
|
|
||||||
it "has prelude" $ do
|
it "has prelude" $ do
|
||||||
res <- evaluate' "preluded.rb"
|
res <- evaluate' "preluded.rb"
|
||||||
fst res `shouldBe` Right (injValue (String "\"<foo>\""))
|
fst res `shouldBe` Right (Right (injValue (String "\"<foo>\"")))
|
||||||
|
|
||||||
where
|
where
|
||||||
addr = Address . Precise
|
addr = Address . Precise
|
||||||
|
Loading…
Reference in New Issue
Block a user