mirror of
https://github.com/github/semantic.git
synced 2024-12-22 22:31:36 +03:00
10 lines
244 B
Haskell
10 lines
244 B
Haskell
module Data.Abstract.Name.Spec where
|
||
|
||
import SpecHelpers
|
||
|
||
spec :: Spec
|
||
spec = describe "Data.Abstract.Name" $
|
||
it "should format anonymous names correctly" $ do
|
||
show (nameI 0) `shouldBe` "\"_a\""
|
||
show (nameI 26) `shouldBe` "\"_aʹ\""
|