git.iko.soy/rowtype-yoga/purescript-native
on db2dd21 help sign in
rowtype-yoga/purescript-native/examples/passing/Objects.purs
30 lines 568 B history raw
1module Main where
3 import Prelude
5 test = \x -> x.foo + x.bar + 1
7 append = \o -> { foo: o.foo, bar: 1 }
9 apTest = append({foo : "Foo", baz: "Baz"})
11 f = (\a -> a.b.c) { b: { c: 1, d: "Hello" }, e: "World" }
13 g = (\a -> a.f { x: 1, y: "y" }) { f: \o -> o.x + 1 }
15 typed :: { foo :: Number }
16 typed = { foo: 0 }
18 test2 = \x -> x."!@#"
20 test3 = typed."foo"
22 test4 = test2 weirdObj
23 where
24 weirdObj :: { "!@#" :: Number }
25 weirdObj = { "!@#": 1 }
27 test5 = case { "***": 1 } of
28 { "***" = n } -> n
30 main = Debug.Trace.trace "Done"