git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Default fixity declaration is infixl
commit2a7c5b4039980f915a309623ca93b4d0b9701367 authorPhil Freeman <paf31@cantab.net> dateThu 31 Oct 2013, 12:03 (13 years ago) parent8da2924
1 file changed+1−1
src/PureScript/Parser/Values.hs+1−1
src/PureScript/Parser/Values.hs+1−1
@@ -136,7 +136,7 @@ parseValue = do
136136 , Prefix $ C.lexeme (P.try $ C.indented *> C.reservedOp "-") >> return (Unary Negate)
137137 , Prefix $ C.lexeme (P.try $ C.indented *> C.reservedOp "+") >> return id ]
138138 ] ++ customOperatorTable user ++
139− [ [ Infix (C.lexeme (P.try (C.indented *> C.parseIdentInfix P.<?> "operator") >>= \ident -> return $ \t1 t2 -> App (App (Var ident) [t1]) [t2])) AssocRight ]
139+ [ [ Infix (C.lexeme (P.try (C.indented *> C.parseIdentInfix P.<?> "operator") >>= \ident -> return $ \t1 t2 -> App (App (Var ident) [t1]) [t2])) AssocLeft ]
140140 , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "<=") >> return (Binary LessThanOrEqualTo)) AssocRight
141141 , Infix (C.lexeme (P.try $ C.indented *> C.reservedOp ">=") >> return (Binary GreaterThanOrEqualTo)) AssocRight ]
142142 , [ Infix (C.lexeme (P.try $ C.indented *> C.reservedOp "<") >> return (Binary LessThan)) AssocRight