Commit db04c1fd authored by Shuhei Kagawa's avatar Shuhei Kagawa Committed by Herbert Valerio Riedel

Fix typo: ambigious -> ambiguous

parent bcdcdc10
...@@ -108,14 +108,14 @@ buildExpressionParser operators simpleExpr ...@@ -108,14 +108,14 @@ buildExpressionParser operators simpleExpr
prefixOp = choice prefix <?> "" prefixOp = choice prefix <?> ""
postfixOp = choice postfix <?> "" postfixOp = choice postfix <?> ""
ambigious assoc op= try $ ambiguous assoc op= try $
do{ _ <- op; fail ("ambiguous use of a " ++ assoc do{ _ <- op; fail ("ambiguous use of a " ++ assoc
++ " associative operator") ++ " associative operator")
} }
ambigiousRight = ambigious "right" rassocOp ambiguousRight = ambiguous "right" rassocOp
ambigiousLeft = ambigious "left" lassocOp ambiguousLeft = ambiguous "left" lassocOp
ambigiousNon = ambigious "non" nassocOp ambiguousNon = ambiguous "non" nassocOp
termP = do{ pre <- prefixP termP = do{ pre <- prefixP
; x <- term ; x <- term
...@@ -131,8 +131,8 @@ buildExpressionParser operators simpleExpr ...@@ -131,8 +131,8 @@ buildExpressionParser operators simpleExpr
; y <- do{ z <- termP; rassocP1 z } ; y <- do{ z <- termP; rassocP1 z }
; return (f x y) ; return (f x y)
} }
<|> ambigiousLeft <|> ambiguousLeft
<|> ambigiousNon <|> ambiguousNon
-- <|> return x -- <|> return x
rassocP1 x = rassocP x <|> return x rassocP1 x = rassocP x <|> return x
...@@ -141,17 +141,17 @@ buildExpressionParser operators simpleExpr ...@@ -141,17 +141,17 @@ buildExpressionParser operators simpleExpr
; y <- termP ; y <- termP
; lassocP1 (f x y) ; lassocP1 (f x y)
} }
<|> ambigiousRight <|> ambiguousRight
<|> ambigiousNon <|> ambiguousNon
-- <|> return x -- <|> return x
lassocP1 x = lassocP x <|> return x lassocP1 x = lassocP x <|> return x
nassocP x = do{ f <- nassocOp nassocP x = do{ f <- nassocOp
; y <- termP ; y <- termP
; ambigiousRight ; ambiguousRight
<|> ambigiousLeft <|> ambiguousLeft
<|> ambigiousNon <|> ambiguousNon
<|> return (f x y) <|> return (f x y)
} }
-- <|> return x -- <|> return x
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment