Fix formatting.

This commit is contained in:
Paweł Nowak 2014-11-29 18:01:08 +01:00
parent 5317f92f7c
commit a2906ceea3
2 changed files with 2 additions and 2 deletions

View File

@ -73,7 +73,7 @@ apps = bifoldl1 _App /$/ S.sepBy1 atom S.spaces1
expr :: SyntaxChar syn Text => syn AST
expr = _Abs /$~ S.char '\\' /*/ S.spaces_
/*/ name /*/ S.spaces
/*/ S.string "->" /*/ S.spaces
/*/ S.string "->" /*/ S.spaces
/*/ expr
/|/ _Let /$~ S.string "let" /*/ S.spaces1

View File

@ -51,7 +51,7 @@ description:
> quoted = S.char '"' */ S.takeTill (=='"') /* S.char '"'
>
> -- | Encloses a symbol in parentheses.
> parens :: SyntaxChar syn seq => syn a - > syn a
> parens :: SyntaxChar syn seq => syn a -> syn a
> parens m = S.char '(' */ S.spaces_ */ m /* S.spaces_ /* S.char ')'
>
> -- | A literal.