git.iko.soy/rowtype-yoga/purescript-native
on 96edff2 help sign in
22 lines 365 B history raw
1module Test where
3 data Foo = Foo String
5 foo :: Test:Foo -> String
6 foo = \f -> case f of Foo s -> s ++ "foo"
8 bar :: Foo -> String
9 bar = foo
11 module Inner where
13 inner = "Inner"
15baz :: Test:Foo -> String
16baz = Test:foo
18innerCopy :: String
19innerCopy = Test:Inner:inner
21match :: Test:Foo -> String
22match = \f -> case f of Test:Foo s -> s ++ "foo"