git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Add failing test
c3e728cGary Burgess
examples/passing/ObjectWildcards.purs+17
compare with golang
unifiedsplit
@@ -8,7 +8,24 @@ mkRecord = { foo: _, bar: _, baz: "baz" }
8getValue :: forall e. Eff (| e) Boolean
8getValue :: forall e. Eff (| e) Boolean
9getValue = return true
9getValue = return true
10
10
11+foreign import eqeqeq
12+ """
13+ function eqeqeq(x) {
14+ return function (y) {
15+ if (x == y) return x;
16+ throw new Error("Unexpected result: " + x + " /== " + y);
17+ };
18+ };
19+ """ :: forall a. a -> a -> a
20+
21+(===) = eqeqeq
22+infixl 4 ===
23+
11main = do
24main = do
12 obj <- { value: _ } <$> getValue
25 obj <- { value: _ } <$> getValue
13 print obj.value
26 print obj.value
27+ let x = 1
28+ point <- { x: _, y: x } <$> return 2
29+ print $ point.x === 1
30+ print $ point.y === 2
14 trace (mkRecord 1 "Done!").bar
31 trace (mkRecord 1 "Done!").bar