git.iko.soy/elk
on master help sign in
Parse unit expressions
c2c3506Evan Czaplicki
src/Parse/Expression.hs+4
compare with master
unifiedsplit
@@ -86,6 +86,10 @@ tuple start =
86 return $ mkLambda start end "x" $ mkLambda start end "y" $
86 return $ mkLambda start end "x" $ mkLambda start end "y" $
87 A.at start end (Src.Binop [(x, A.at start end op)] y)
87 A.at start end (Src.Binop [(x, A.at start end op)] y)
88
88
89+ , do rightParen
90+ end <- getPosition
91+ return (A.at start end (Src.tuple []))
92+
89 , do comma
93 , do comma
90 arity <- chompCommas 2
94 arity <- chompCommas 2
91 rightParen
95 rightParen