unicode 0.0.1.1 → 0.0.1.2
raw patch · 3 files changed
+32/−10 lines, 3 filesdep ~semigroups
Dependency ranges changed: semigroups
Files
- src/Data/Char/Frame.hs +7/−0
- src/Data/Char/Number.hs +10/−0
- unicode.cabal +15/−10
src/Data/Char/Frame.hs view
@@ -260,3 +260,10 @@ (_, Parts (Vertical True False) (Horizontal True True)) -> adapt '\x2567' (_, Parts (Vertical True True) (Horizontal True True)) -> adapt '\x256A' ++{-+'\x254C' Parts Light DOUBLE DASH HORIZONTAL+'\x254D' Parts Heavy DOUBLE DASH HORIZONTAL+'\x254E' Parts Light DOUBLE DASH VERTICAL+'\x254F' Parts Heavy DOUBLE DASH VERTICAL+-}
src/Data/Char/Number.hs view
@@ -4,6 +4,11 @@ import Data.Map (Map) +{-+fractionMaybe :: (Ord a, Fractional a) => a -> Maybe Char+fractionMaybe x = Map.lookup x fractionMap+-}+ fractionMap :: (Ord a, Fractional a) => Map a Char fractionMap = Map.fromList $@@ -27,3 +32,8 @@ (7/8, '\x215E') : [] ++{-+circled number+\x2776+-}
unicode.cabal view
@@ -1,10 +1,10 @@ Name: unicode-Version: 0.0.1.1+Version: 0.0.1.2 License: BSD3 License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de> Maintainer: Henning Thielemann <haskell@henning-thielemann.de>-Homepage: http://hub.darcs.net/thielema/unicode/+Homepage: https://hub.darcs.net/thielema/unicode/ Category: Text Synopsis: Construct and transform unicode characters Description:@@ -26,7 +26,7 @@ * @rfc5051@: sorting of characters Tested-With: GHC==7.4.2, GHC==8.4.1-Cabal-Version: >=1.8+Cabal-Version: >=1.10 Build-Type: Simple Flag buildExamples@@ -34,20 +34,21 @@ default: False Source-Repository this- Tag: 0.0.1.1+ Tag: 0.0.1.2 Type: darcs- Location: http://hub.darcs.net/thielema/unicode/+ Location: https://hub.darcs.net/thielema/unicode/ Source-Repository head Type: darcs- Location: http://hub.darcs.net/thielema/unicode/+ Location: https://hub.darcs.net/thielema/unicode/ Library Build-Depends:- containers >=0.4 && <0.7,- semigroups >=0.1 && <1.0,+ containers >=0.4 && <0.9,+ semigroups >=0.1 && <1, base >=4 && <5 + Default-Language: Haskell98 GHC-Options: -Wall Hs-Source-Dirs: src Exposed-Modules:@@ -55,6 +56,8 @@ Data.Char.Frame Data.Char.Number Data.Char.Small+-- Data.Char.Arrow+-- Data.Char.Card Executable visualize-unicode If flag(buildExamples)@@ -65,9 +68,10 @@ base Else Buildable: False- Main-Is: Visualize.hs+ Default-Language: Haskell98 GHC-Options: -Wall Hs-source-dirs: vis+ Main-Is: Visualize.hs Other-Modules: Visualize.Data.Char.Block Visualize.Data.Char.Frame@@ -82,9 +86,10 @@ containers, utility-ht >=0.0.1 && <0.1, base- Main-Is: Test.hs+ Default-Language: Haskell98 GHC-Options: -Wall Hs-source-dirs: test+ Main-Is: Test.hs Other-Modules: Test.Data.Char.Block Test.Data.Char.Frame