git.iko.soy/rowtype-yoga/purescript-native
on 3b7ea16 help sign in
14 lines 438 B history raw
1module Main where
3import Data.Function
4import Control.Monad.Eff
5import Debug.Trace
7main = do
8 runFn0 (mkFn0 $ \_ -> trace $ show 0)
9 runFn1 (mkFn1 $ \a -> trace $ show a) 1
10 runFn2 (mkFn2 $ \a b -> trace $ show [a, b]) 1 2
11 runFn3 (mkFn3 $ \a b c -> trace $ show [a, b, c]) 1 2 3
12 runFn4 (mkFn4 $ \a b c d -> trace $ show [a, b, c, d]) 1 2 3 4
13 runFn5 (mkFn5 $ \a b c d e -> trace $ show [a, b, c, d, e]) 1 2 3 4 5
14 trace "Done!"