Skip to content
Snippets Groups Projects

Add support for higher-rank polymorphism

Merged Jan-Hendrik Matthes requested to merge higher-rank-polymorphism into master
1 file
+ 1
1
Compare changes
  • Side-by-side
  • Inline
@@ -617,7 +617,7 @@ forallType :: Parser a Token ([Span], [Ident])
forallType = mk <$> tokenSpan Id_forall <*> many1 tyvar <*> tokenSpan SymDot
where mk sp1 tvs sp2 = ([sp1, sp2], tvs)
-- type0 ::= {forallType} type00
-- type0 ::= {forallType} typeForall
type0 :: Parser a Token TypeExpr
type0 = mk <$> many forallType <*> typeForall
where
Loading