Switch Name type to use Data.Text instead of String

This gives a few percent speedup in the interpreter.
This commit is contained in:
Brian Huffman 2015-08-12 17:58:57 -07:00
parent 4976a8db3e
commit dadc5e1781

View File

@ -1,12 +1,14 @@
module Cryptol.ModuleSystem.Name where
type Ident = String
import qualified Data.Text as Text
type Ident = Text.Text
pack :: String -> Ident
pack = id
pack = Text.pack
unpack :: Ident -> String
unpack = id
unpack = Text.unpack
-- | Module names are just namespaces.
--