diff --git a/GhcCore/Parser.hs b/GhcCore/Parser.hs
--- a/GhcCore/Parser.hs
+++ b/GhcCore/Parser.hs
@@ -135,10 +135,11 @@
     unknown = Unknown . (:[]) <$> anyToken
     keyOrIdent s = fromMaybe (Symbol s) $ lookup s keywordTable
 
-    typeSignature = parseLevel (0 :: Int)
-      where parseLevel n
+    typeSignature = parseLevel 0
+      where parseLevel :: Int -> Parser String
+            parseLevel n
                 | n == 0    = do
-                    left <- many (noneOf "()=")
+                    left <- many $ noneOf "()="
                     rt   <- try ((:) <$> char '(' <*> parseLevel 1)
                               <|> return ""
                     return (left ++ rt)
diff --git a/ghc-core-html.cabal b/ghc-core-html.cabal
--- a/ghc-core-html.cabal
+++ b/ghc-core-html.cabal
@@ -1,5 +1,5 @@
 Name:                ghc-core-html
-Version:             0.1.3
+Version:             0.1.4
 Synopsis:            Core to HTML display
 Description:         Display GHC core using a friendly colored, clickable and dynamic html output
 License:             BSD3