@@ -25,7 +25,7 @@ import qualified AST.Expression.Source as Src
2525import qualified AST.Variable as Var
2626
2727import Text.Parsec hiding (newline,spaces)
28−import Parse.Declaration (alias,datatype,infixDecl)
28+import Parse.Declaration (typeDecl,infixDecl)
2929import Parse.Expression (typeAnnotation)
3030import Parse.Helpers
3131import Parse.Module (moduleDef)
@@ -102,7 +102,7 @@ docThing = uncommentable <|> commented <|> uncommented ""
102102 uncommented comment
103103
104104 uncommented comment = do
105− (src,def) <- withSource $ choice [ alias, datatype, D.Definition <$> typeAnnotation ]
105+ (src,def) <- withSource $ choice [ typeDecl, D.Definition <$> typeAnnotation ]
106106 return (comment, def, src)
107107
108108