examples/passing/Module/M1.purs · rowtype-yoga/purescript-native

git.iko.soy/rowtype-yoga/purescript-native

on 2280aa8 help sign in

14 lines 189 B history raw

1module M1 where

3import Prelude

5data Foo = Foo String

7foo :: M1.Foo -> String

8foo = \f -> case f of Foo s -> s <> "foo"

10bar :: Foo -> String

11bar = foo

13incr :: Int -> Int

14incr x = x + 1