git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix #815
b557066Phil Freeman
examples/passing/Operators.purs+6
@@ -73,6 +73,11 @@ module Main where
73 test19 :: Number
73 test19 :: Number
74 test19 = negate $ negate (-1)
74 test19 = negate $ negate (-1)
75
75
76+ test20 :: Number
77+ test20 = 1 @ 2
78+ where
79+ (@) x y = x + y * y
80+
76 main = do
81 main = do
77 let t1 = test1 1 2 (\x y -> x + y)
82 let t1 = test1 1 2 (\x y -> x + y)
78 let t2 = test2
83 let t2 = test2
@@ -93,4 +98,5 @@ module Main where
93 let t17 = test17
98 let t17 = test17
94 let t18 = test18
99 let t18 = test18
95 let t19 = test19
100 let t19 = test19
101+ let t20 = test20
96 trace "Done"
102 trace "Done"
src/Language/PureScript/Parser/Lexer.hs+1
@@ -422,6 +422,7 @@ symbol = token go P.<?> "symbol"
422 go (Symbol s) = Just s
422 go (Symbol s) = Just s
423 go Colon = Just ":"
423 go Colon = Just ":"
424 go LFatArrow = Just "<="
424 go LFatArrow = Just "<="
425+ go At = Just "@"
425 go _ = Nothing
426 go _ = Nothing
426
427
427symbol' :: String -> TokenParser ()
428symbol' :: String -> TokenParser ()