diff --git a/madlang.cabal b/madlang.cabal
--- a/madlang.cabal
+++ b/madlang.cabal
@@ -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
diff --git a/src/Text/Madlibs/Cata/Run.hs b/src/Text/Madlibs/Cata/Run.hs
--- a/src/Text/Madlibs/Cata/Run.hs
+++ b/src/Text/Madlibs/Cata/Run.hs
@@ -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