diff --git a/Data/Stream.hs b/Data/Stream.hs
--- a/Data/Stream.hs
+++ b/Data/Stream.hs
@@ -288,8 +288,8 @@
 -- The suspicion is that under fusion the append will force the bottom.
 --
 data Stream a = forall s. Unlifted s =>
-                          Stream !(s -> Step a s)  -- ^ a stepper function
-                                 !s                -- ^ an initial state
+                          Stream !(s -> Step a s)  -- a stepper function
+                                 !s                -- an initial state
 
 -- | A stream step.
 --
diff --git a/stream-fusion.cabal b/stream-fusion.cabal
--- a/stream-fusion.cabal
+++ b/stream-fusion.cabal
@@ -1,5 +1,5 @@
 Name:                stream-fusion
-Version:             0.1.2.1
+Version:             0.1.2.2
 Author:              Duncan Coutts, Don Stewart
 Maintainer:          duncan.coutts@worc.ox.ac.uk, dons@galois.com
 License:             BSD3
@@ -16,7 +16,7 @@
         and hide list functions from the Prelude.
 Category:            Data
 Build-Type:          Simple
-Build-Depends:       base
+Build-Depends:       base < 10
 Stability:           experimental
 Tested-with:         GHC==6.8
 Exposed-modules:     Data.Stream
@@ -26,7 +26,7 @@
 cpp-options:         -DEXTERNAL_PACKAGE
 ghc-options:         -fglasgow-exts
                      -O2
-                     -fvia-C -optc-O2
+                     -fvia-C -optc-O3
                      -fspec-constr
                      -funbox-strict-fields 
                      -fdicts-cheap