diff --git a/language-bash.cabal b/language-bash.cabal
--- a/language-bash.cabal
+++ b/language-bash.cabal
@@ -1,16 +1,16 @@
 name:               language-bash
-version:            0.7.0
+version:            0.7.1
 category:           Language
 license:            BSD3
 license-file:       LICENSE
 author:             Kyle Raftogianis
 maintainer:         Kyle Raftogianis <kylerafto@gmail.com>
-copyright:          Copyright (c) 2013-2016 Kyle Raftogianis
+copyright:          Copyright (c) 2013-2018 Kyle Raftogianis
 build-type:         Simple
 cabal-version:      >= 1.8
 homepage:           http://github.com/knrafto/language-bash/
 bug-reports:        http://github.com/knrafto/language-bash/issues
-tested-with:        GHC == 7.6.3, GHC == 7.8.4, GHC == 7.10.1, GHC == 7.10.2, GHC == 8.0.2
+tested-with:        GHC == 7.6.3, GHC == 7.8.4, GHC == 7.10.1, GHC == 7.10.2, GHC == 8.0.2, GHC == 8.4.3
 synopsis:           Parsing and pretty-printing Bash shell scripts
 description:
     A library for parsing, pretty-printing, and manipulating
diff --git a/src/Language/Bash/Expand.hs b/src/Language/Bash/Expand.hs
--- a/src/Language/Bash/Expand.hs
+++ b/src/Language/Bash/Expand.hs
@@ -8,7 +8,7 @@
     ) where
 
 #if __GLASGOW_HASKELL__ >= 710
-import Prelude hiding (Word)
+import Prelude hiding ((<>), Word)
 #else
 import Data.Traversable (traverse)
 #endif
diff --git a/src/Language/Bash/Syntax.hs b/src/Language/Bash/Syntax.hs
--- a/src/Language/Bash/Syntax.hs
+++ b/src/Language/Bash/Syntax.hs
@@ -26,7 +26,7 @@
     ) where
 
 #if __GLASGOW_HASKELL__ >= 710
-import Prelude hiding (Word)
+import Prelude hiding ((<>), Word)
 #endif
 
 import Data.Data        (Data)
diff --git a/src/Language/Bash/Word.hs b/src/Language/Bash/Word.hs
--- a/src/Language/Bash/Word.hs
+++ b/src/Language/Bash/Word.hs
@@ -25,7 +25,7 @@
     ) where
 
 #if __GLASGOW_HASKELL__ >= 710
-import Prelude hiding (Word)
+import Prelude hiding ((<>), Word)
 #endif
 
 import           Data.Data        (Data)
diff --git a/tests/Tests.hs b/tests/Tests.hs
--- a/tests/Tests.hs
+++ b/tests/Tests.hs
@@ -1,6 +1,7 @@
 module Main (main) where
 
 import           Control.Applicative ((<$>))
+import           Control.Monad
 import           System.Process           (readProcess)
 import           Test.QuickCheck
 import           Test.QuickCheck.Monadic  as QCM
@@ -44,7 +45,15 @@
 prop_expandsLikeBash = monadicIO $ forAllM braceExpr $ \str -> do
     bash <- run $ expandWithBash str
     let check = unwords . filter (not . null) $ testExpand str
-    QCM.assert (bash == check)
+    when (bash /= check) $ do
+      run $ putStrLn "FAIL"
+      run $ putStrLn "input:"
+      run $ putStrLn str
+      run $ putStrLn "bash output:"
+      run $ putStrLn bash
+      run $ putStrLn "test output:"
+      run $ putStrLn check
+      QCM.assert False
 
 properties :: TestTree
 properties = testGroup "Properties" [testProperty "brace expansion" prop_expandsLikeBash]