unicode-show 0.1.0.0 → 0.1.0.1

raw patch · 2 files changed

+15/−24 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• test/Spec.hs +7/−19
• unicode-show.cabal +8/−5

@@ -7,22 +7,7 @@ import Test.Framework.Providers.QuickCheck2 (testProperty) import Test.HUnit.Base hiding (Test) -import Text.Show.Unicode hiding (ushow)-----ushow :: Show a => a -> String-ushow x = go (show x) where-      go :: String -> String-      go [] = []-      go s@(x:xs) = case x of-          '\"' -> '\"' : str ++ "\"" ++ go rest-          '\'' -> '\'' : char : '\'' : go rest'-          _    -> x : go xs-        where-          (str :: String, rest):_ = reads s-          (char :: Char, rest'):_ = reads s+import Text.Show.Unicode  data T試6験 = Å4 { すけろく :: String} deriving (Eq, Ord, Show, Read) data T試7験 = String :\& String  deriving (Eq, Ord, Show, Read)@@ -39,9 +24,12 @@ tests :: [Test] tests =   [ testGroup "individual representations test"-    [-      "漢6" `ushowTo` "\"漢6\""-    , "\na\ri\ta 国際空港" `ushowTo` "\"\\na\\ri\\ta 国際空港\""+    [ "صباح الخير" `ushowTo` "\"صباح الخير\""+    , "😆💕>λ\\=🐘" `ushowTo`  "\"😆💕>λ\\\\=🐘\""+    , "漢6" `ushowTo` "\"漢6\""+    , "\32\&7" `ushowTo` "\" 7\""+    , "改\n行" `ushowTo` "\"改\\n行\""+    , "下一站\na\ri\ta国际机场" `ushowTo` "\"下一站\\na\\ri\\ta国际机场\""     , "\SOH\SO\&H" `ushowTo` "\"\\SOH\\SO\\&H\""     ] 

@@ -1,14 +1,17 @@ name:                unicode-show-version:             0.1.0.0+version:             0.1.0.1 synopsis:            print and show in unicode description:-            This package provides variants of 'show' and 'print' functions that does not escape non-ascii characters. Run ghci with  __@-interactive-print@__ flag to prints unicode characters. See <https://downloads.haskell.org/~ghc/latest/docs/html/users_guide/interactive-evaluation.html#ghci-interactive-print Using a custom interactive printing function> section in the GHC manual.-+            This package provides variants of 'show' and 'print' functions that does not escape non-ascii characters.+            .+            See <http://github.com/nushio3/unicode-show#readme README> for usage.+            .+            Run ghci with  @-interactive-print@ flag to print unicode characters. See <https://downloads.haskell.org/~ghc/latest/docs/html/users_guide/interactive-evaluation.html#ghci-interactive-print Using a custom interactive printing function> section in the GHC manual.    -homepage:            http://github.com/githubuser/unicode-show#readme+homepage:            http://github.com/nushio3/unicode-show#readme license:             BSD3 license-file:        LICENSE author:              Takayuki Muranushi@@ -42,4 +45,4 @@  source-repository head   type:     git-  location: https://github.com/githubuser/unicode-show+  location: https://github.com/nushio3/unicode-show