diff --git a/AhoCorasick.cabal b/AhoCorasick.cabal
--- a/AhoCorasick.cabal
+++ b/AhoCorasick.cabal
@@ -1,5 +1,5 @@
 name:            AhoCorasick
-version:         0.0.2
+version:         0.0.3
 license:         BSD3
 license-file:    LICENSE
 category:        Text
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -46,10 +46,10 @@
 ```
 
 ```
-(u,[])
-(s,[])
-(h,[])
-(e,[(3,"she"),(2,"he")])
-(r,[])
-(s,[(4,"hers")])
+('u',[])
+('s',[])
+('h',[])
+('e',[(3,"she"),(2,"he")])
+('r',[])
+('s',[(4,"hers")])
 ```
diff --git a/Text/AhoCorasick.hs b/Text/AhoCorasick.hs
--- a/Text/AhoCorasick.hs
+++ b/Text/AhoCorasick.hs
@@ -56,7 +56,8 @@
 @
 -}
 module Text.AhoCorasick (
-      makeStateMachine
+      StateMachine
+    , makeStateMachine
     , makeSimpleStateMachine
     , findAll
     , Position(..)
@@ -303,3 +304,4 @@
     mapM_ (\(s,v) -> addKeyVal tree s v) kv
     findFailures tree
     convertToStateMachine tree
+
diff --git a/Text/AhoCorasick/Internal/Deque.hs b/Text/AhoCorasick/Internal/Deque.hs
--- a/Text/AhoCorasick/Internal/Deque.hs
+++ b/Text/AhoCorasick/Internal/Deque.hs
@@ -1,3 +1,4 @@
+-- Simple FIFO queue in ST monad
 module Text.AhoCorasick.Internal.Deque (
       mkDQ
     , pushBack