ParseDecl: try parsing without StarIsType

Author: Bodigrim

src/Input/ParseDecl.hs

@@ -527,6 +527,7 @@ runGhcLibParser str
 runGhcLibParser str = case runGhcLibParserWithExtensions almostAllExtensions str of
     PFailed{}
         | '#' `elem` str -> runGhcLibParserWithExtensions noUnboxed str
+        | '*' `elem` str -> runGhcLibParserWithExtensions noStarIsType str
         | "pattern" `isInfixOf` str -> runGhcLibParserWithExtensions noPatternSynonyms str
     res -> res
 
@@ -556,6 +557,9 @@ noUnboxed =
 noPatternSynonyms :: EnumSet.EnumSet Extension
 noPatternSynonyms = EnumSet.delete PatternSynonyms almostAllExtensions
 
+noStarIsType :: EnumSet.EnumSet Extension
+noStarIsType = EnumSet.delete StarIsType almostAllExtensions
+
 runGhcLibParserWithExtensions ::
     EnumSet.EnumSet Extension ->
     String ->