mirror of
https://github.com/typeable/inflections-hs.git
synced 2024-09-11 06:05:33 +03:00
Hide ‘Text.Inflections.Types’
This commit is contained in:
parent
008c070982
commit
da792fdfec
@ -87,6 +87,15 @@ module Text.Inflections
|
||||
, ordinalize
|
||||
, parseSnakeCase
|
||||
, parseCamelCase
|
||||
-- * Types and helpers
|
||||
, Word
|
||||
, WordType (..)
|
||||
, mkWord
|
||||
, mkAcronym
|
||||
, unWord
|
||||
, SomeWord (..)
|
||||
, unSomeWord
|
||||
, InflectionException (..)
|
||||
-- * Often used combinators
|
||||
, toUnderscore
|
||||
, toDashed
|
||||
@ -110,6 +119,10 @@ import Text.Inflections.Types
|
||||
import Text.Inflections.Underscore (underscore)
|
||||
import Text.Megaparsec
|
||||
|
||||
#if MIN_VERSION_base(4,8,0)
|
||||
import Prelude hiding (Word)
|
||||
#endif
|
||||
|
||||
-- | Transforms CamelCasedString to snake_cased_string_with_underscores. In
|
||||
-- case of failed parsing 'InflectionException' is thrown.
|
||||
--
|
||||
|
@ -29,7 +29,6 @@ flag dev
|
||||
|
||||
library
|
||||
exposed-modules: Text.Inflections
|
||||
, Text.Inflections.Types
|
||||
|
||||
other-modules: Text.Inflections.Data
|
||||
, Text.Inflections.Camelize
|
||||
@ -41,6 +40,7 @@ library
|
||||
, Text.Inflections.Parse.SnakeCase
|
||||
, Text.Inflections.Titleize
|
||||
, Text.Inflections.Transliterate
|
||||
, Text.Inflections.Types
|
||||
, Text.Inflections.Underscore
|
||||
|
||||
if flag(dev)
|
||||
|
@ -7,8 +7,7 @@ where
|
||||
|
||||
import Test.Hspec
|
||||
|
||||
import Text.Inflections (dasherize)
|
||||
import Text.Inflections.Types
|
||||
import Text.Inflections
|
||||
|
||||
#if !MIN_VERSION_base(4,8,0)
|
||||
import Control.Applicative
|
||||
|
@ -5,8 +5,7 @@ module Text.Inflections.HumanizeSpec (spec) where
|
||||
|
||||
import Test.Hspec
|
||||
|
||||
import Text.Inflections (humanize)
|
||||
import Text.Inflections.Types
|
||||
import Text.Inflections
|
||||
|
||||
#if !MIN_VERSION_base(4,8,0)
|
||||
import Control.Applicative
|
||||
|
@ -4,8 +4,7 @@
|
||||
module Text.Inflections.TitleizeSpec (spec) where
|
||||
|
||||
import Test.Hspec
|
||||
import Text.Inflections (titleize)
|
||||
import Text.Inflections.Types
|
||||
import Text.Inflections
|
||||
|
||||
#if !MIN_VERSION_base(4,8,0)
|
||||
import Control.Applicative
|
||||
|
@ -4,8 +4,7 @@
|
||||
module Text.Inflections.UnderscoreSpec (spec) where
|
||||
|
||||
import Test.Hspec
|
||||
import Text.Inflections (underscore)
|
||||
import Text.Inflections.Types
|
||||
import Text.Inflections
|
||||
|
||||
#if !MIN_VERSION_base(4,8,0)
|
||||
import Control.Applicative
|
||||
|
Loading…
Reference in New Issue
Block a user