git.iko.soy/rowtype-yoga/purescript-native
on 820fbac help sign in
28 lines 422 B history raw
1module M1 where
3 import Prelude
5 data Foo = Foo String
7 foo :: M1.Foo -> String
8 foo = \f -> case f of Foo s -> s ++ "foo"
10 bar :: Foo -> String
11 bar = foo
13 incr :: Number -> Number
14 incr x = x + 1
16module M2 where
18 import Prelude
20 baz :: M1.Foo -> String
21 baz = M1.foo
23 match :: M1.Foo -> String
24 match = \f -> case f of M1.Foo s -> s ++ "foo"
26module Main where
28main = Debug.Trace.trace "Done"