diff --git a/Data/Text/Lazy/Builder.hs b/Data/Text/Lazy/Builder.hs
--- a/Data/Text/Lazy/Builder.hs
+++ b/Data/Text/Lazy/Builder.hs
@@ -37,6 +37,7 @@
    , singleton
    , fromText
    , fromLazyText
+   , fromString
 
      -- * Flushing the buffer state
    , flush
diff --git a/tests/Makefile b/tests/Makefile
--- a/tests/Makefile
+++ b/tests/Makefile
@@ -1,4 +1,5 @@
 version := $(shell awk '/^version:/{print $$2}' ../text.cabal)
+ghc-major-version := $(shell ghc --numeric-version | sed 's/\..*//')
 ghc := ghc
 ghc-opt-flags = -O0
 ghc-base-flags := -funbox-strict-fields -hide-all-packages \
@@ -6,9 +7,12 @@
 	-package criterion -package deepseq -DASSERTS -DHAVE_DEEPSEQ \
 	-package bytestring -ignore-package text \
 	-fno-ignore-asserts
+ifeq ($(ghc-major-version),7)
+    ghc-base-flags += -rtsopts
+endif
 ghc-test-flags := -package QuickCheck -package test-framework -package deepseq \
 	-package test-framework-quickcheck2 -package test-framework-hunit \
-	-package HUnit
+	-package HUnit -package directory
 ghc-base-flags += -Wall -fno-warn-orphans -fno-warn-missing-signatures
 ghc-flags := $(ghc-base-flags) -i../dist/build -package-name text-$(version)
 ghc-hpc-flags := $(ghc-base-flags) -fhpc -fno-ignore-asserts -odir hpcdir \
diff --git a/tests/Properties.hs b/tests/Properties.hs
--- a/tests/Properties.hs
+++ b/tests/Properties.hs
@@ -1,5 +1,5 @@
 {-# LANGUAGE BangPatterns, FlexibleInstances, OverloadedStrings,
-             ScopedTypeVariables, TypeSynonymInstances #-}
+             ScopedTypeVariables, TypeSynonymInstances, CPP #-}
 {-# OPTIONS_GHC -fno-enable-rewrite-rules #-}
 
 import Test.QuickCheck
@@ -734,6 +734,8 @@
 
 windowsNewlineMode  = NewlineMode { inputNL = CRLF, outputNL = CRLF }
 
+-- Newline and NewlineMode have standard Show instance from GHC 7 onwards
+#if __GLASGOW_HASKELL__ < 700
 instance Show Newline where
     show CRLF = "CRLF"
     show LF   = "LF"
@@ -741,6 +743,7 @@
 instance Show NewlineMode where
     show (NewlineMode i o) = "NewlineMode { inputNL = " ++ show i ++
                              ", outputNL = " ++ show o ++ " }"
+# endif
 
 instance Arbitrary NewlineMode where
     arbitrary = oneof . map return $
@@ -770,13 +773,13 @@
     monadicIO $ assert . (==t) =<< run act
   where t = unline . map (filt (not . (`elem` "\r\n"))) $ ts
         act = withTempFile $ \path h -> do
-                hSetEncoding h enc
+                -- hSetEncoding h enc
                 hSetNewlineMode h nl
                 hSetBuffering h buf
                 () <- writer h t
                 hClose h
                 bracket (openFile path ReadMode) hClose $ \h' -> do
-                  hSetEncoding h' enc
+                  -- hSetEncoding h' enc
                   hSetNewlineMode h' nl
                   hSetBuffering h' buf
                   r <- reader h'
diff --git a/text.cabal b/text.cabal
--- a/text.cabal
+++ b/text.cabal
@@ -1,5 +1,5 @@
 name:           text
-version:        0.11.0.7
+version:        0.11.0.8
 homepage:       http://bitbucket.org/bos/text
 bug-reports:    http://bitbucket.org/bos/text/issues
 synopsis:       An efficient packed Unicode text type.