Add Elm.Name.startsWith for finding comparableX names
commit990ec7af13da0555530383ccf25333f2118aca58
authorEvan Czaplicki <evancz@users.noreply.github.com>
dateFri 12 Jan 2018, 16:24 (9 years ago)
parentb42fe5a
src/Elm/Name.hs+6
@@ -3,6 +3,7 @@
33module Elm.Name
44 ( Name
55 , length
6+ , startsWith
67 , toString
78 , toBuilder
89 , toShort
@@ -42,6 +43,11 @@ length =
4243 Text.length
4344
4445
46+startsWith :: Name -> Name -> Bool
47+startsWith =
48+ Text.isPrefixOf
49+
50+
4551toString :: Name -> String
4652toString =
4753 Text.unpack