diff --git a/Text/Lexer/Inchworm/Char.hs b/Text/Lexer/Inchworm/Char.hs
--- a/Text/Lexer/Inchworm/Char.hs
+++ b/Text/Lexer/Inchworm/Char.hs
@@ -181,14 +181,15 @@
 scanHaskellCommentLine 
  = munchPred Nothing matchC acceptC
  where
-        matchC 0 '-'     = True
-        matchC 1 '-'     = True
-        matchC _ '\n'    = False
+        matchC 0 '-'                    = True
+        matchC 1 '-'                    = True
+        matchC _ '\n'                   = False
         matchC ix _       
-         | ix < 2       = False
-         | otherwise    = True
+         | ix < 2                       = False
+         | otherwise                    = True
 
-        acceptC cs      = Just cs
+        acceptC ('-' : '-' : cs)        = Just cs
+        acceptC _                       = Nothing
 
 {-# SPECIALIZE INLINE
      scanHaskellCommentLine
diff --git a/inchworm.cabal b/inchworm.cabal
--- a/inchworm.cabal
+++ b/inchworm.cabal
@@ -1,5 +1,5 @@
 name:           inchworm
-version:        1.0.0.1
+version:        1.0.1.1
 license:        MIT
 license-file:   LICENSE
 author:         The Inchworm Development Team