diff --git a/CHANGELOG.markdown b/CHANGELOG.markdown
--- a/CHANGELOG.markdown
+++ b/CHANGELOG.markdown
@@ -1,3 +1,7 @@
+# v1.3.8.1 (2017/07/21)
+
+* Fix haddocks error (#208)
+
 # v1.3.8 (2017/07/20)
 
 * Add support for calling Functions in Strings (#199)
diff --git a/Puppet/Parser/Types.hs b/Puppet/Parser/Types.hs
--- a/Puppet/Parser/Types.hs
+++ b/Puppet/Parser/Types.hs
@@ -235,9 +235,9 @@
     | DTEnum (NonEmpty Text)
     | DTAny
     | DTCollection
-    -- | Tuple (NonEmpty DataType) Integer Integer
-    -- | DTDefault
-    -- | Struct TODO
+    -- Tuple (NonEmpty DataType) Integer Integer
+    -- DTDefault
+    -- Struct TODO
     deriving (Eq, Show)
 
 instance IsList Expression where
diff --git a/language-puppet.cabal b/language-puppet.cabal
--- a/language-puppet.cabal
+++ b/language-puppet.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                language-puppet
-version:             1.3.8
+version:             1.3.8.1
 synopsis:            Tools to parse and evaluate the Puppet DSL.
 description:         This is a set of tools that is supposed to fill all your Puppet needs : syntax checks, catalog compilation, PuppetDB queries, simulationg of complex interactions between nodes, Puppet master replacement, and more !
 homepage:            http://lpuppet.banquise.net/