madlang 0.1.0.3 → 0.1.0.4

raw patch · 2 files changed

+13/−13 lines, 2 filesdep ~basedep ~hspecdep ~hspec-megaparsec

Dependency ranges changed: base, hspec, hspec-megaparsec, lens, madlang, megaparsec, optparse-generic

Files

• madlang.cabal +12/−12
• src/Text/Madlibs/Cata/Run.hs +1/−1

@@ -1,5 +1,5 @@ name: madlang-version: 0.1.0.3+version: 0.1.0.4 cabal-version: >=1.10 build-type: Simple license: BSD3@@ -26,11 +26,11 @@         Text.Madlibs     build-depends:         base >=4.7 && <5,-        megaparsec >=5.0.1 && <5.1,+        megaparsec >=5.2.0 && <5.3,         text >=1.2.2.1 && <1.3,-        optparse-generic >=1.1.1 && <1.2,+        optparse-generic >=1.1.4 && <1.2,         mwc-random >=0.13.5.0 && <0.14,-        lens ==4.14.*,+        lens >=4.15.1 && <4.16,         mtl >=2.2.1 && <2.3,         ansi-wl-pprint >=0.6.7.3 && <0.7     default-language: Haskell2010@@ -49,23 +49,23 @@ executable madlang     main-is: Main.hs     build-depends:-        base >=4.9.0.0 && <4.10,-        madlang >=0.1.0.3 && <0.2+        base >=4.9.1.0 && <4.10,+        madlang >=0.1.0.4 && <0.2     default-language: Haskell2010     hs-source-dirs: app-    ghc-options: -threaded -rtsopts -with-rtsopts=-N -O3 -fllvm+    ghc-options: -threaded -rtsopts -with-rtsopts=-N -O3 -fllvm -optlo-O3  test-suite madlang-test     type: exitcode-stdio-1.0     main-is: Spec.hs     build-depends:-        base >=4.9.0.0 && <4.10,-        madlang >=0.1.0.3 && <0.2,-        hspec >=2.2.4 && <2.3,-        megaparsec >=5.0.1 && <5.1,+        base >=4.9.1.0 && <4.10,+        madlang >=0.1.0.4 && <0.2,+        hspec >=2.4.1 && <2.5,+        megaparsec >=5.2.0 && <5.3,         text >=1.2.2.1 && <1.3,         mtl >=2.2.1 && <2.3,-        hspec-megaparsec >=0.2.1 && <0.3+        hspec-megaparsec >=0.3.1 && <0.4     default-language: Haskell2010     hs-source-dirs: test     ghc-options: -threaded -rtsopts -with-rtsopts=-N -O3 -fllvm

@@ -9,7 +9,7 @@ -- | Generate randomized text from a `RandTok` run :: RandTok -> IO T.Text run tok@(List rs) = do-    value <- (withSystemRandom . asGenST $ \gen -> uniform gen)+    value <-(withSystemRandom . asGenST $ \gen -> uniform gen)     let ret = ((snd . head) . filter ((>=value) . fst)) $ mkCdf tok     case ret of         (Value txt) -> pure txt