git.iko.soy/rowtype-yoga/purescript-native
on 876cfcd help sign in
rowtype-yoga/purescript-native/examples/passing/Module.purs
20 lines 330 B history raw
1module M1 where
3 data Foo = Foo String
5 foo :: M1.Foo -> String
6 foo = \f -> case f of Foo s -> s ++ "foo"
8 bar :: Foo -> String
9 bar = foo
11 incr :: Number -> Number
12 incr x = x + 1
14module M2 where
16 baz :: M1.Foo -> String
17 baz = M1.foo
19 match :: M1.Foo -> String
20 match = \f -> case f of M1.Foo s -> s ++ "foo"