diff --git a/compare-ticks/TickyReport.hs b/compare-ticks/TickyReport.hs
index ba8d2fc2e2092ae5c5a1de1318e620024eaa10f5..0d68f034fc2085ca2fe05e3de1b69d057286bf1b 100644
--- a/compare-ticks/TickyReport.hs
+++ b/compare-ticks/TickyReport.hs
@@ -138,8 +138,10 @@ parseStgName = topName <|> try nonExportedName <|> exportedName
         _name <- funcName
         _sig <- sig
         spaces
-        optional $ do
-            text "(fun)" <|> text "(fun,se)"
+        optional $
+            text "(fun)" <|> text "(fun,se)" <|> text "(thk)" <|> text "(con)"
+                         <|> text "(thk,std)" <|> text "(thk,se)"
+                         <|> text "(thk,se,std)"
         return $ StgName True mod _name _sig Nothing
 
     -- e.g. sat_sbMg{v} (main@main:Main) in sbMh
@@ -150,7 +152,10 @@ parseStgName = topName <|> try nonExportedName <|> exportedName
         spaces
         mod <- fmap (fromMaybe noModule) $ optional $ try $ parens parseModuleName
         spaces
-        optional $ text "(fun)" <|> text "(fun,se)" <|> text "(thk)"
+        optional $
+          text "(fun)" <|> text "(fun,se)" <|> text "(thk)" <|> text "(con)"
+                       <|> text "(thk,std)" <|> text "(thk,se)"
+                       <|> text "(thk,se,std)"
         parent <- optional $ spaces *> text "in" *> spaces *> funcName
         return $ StgName False mod _name _sig parent