git.iko.soy/rowtype-yoga/psfp
on 97117af help sign in
17 lines 476 B history raw
1module Playground.Playground where
3import Prelude
4import Control.Promise (Promise, toAff)
5import Data.Function.Uncurried (Fn2, runFn2)
6import Data.Newtype (class Newtype)
7import Effect.Aff (Aff)
9newtype Folder = Folder String
11derive instance ntFolder ∷ Newtype Folder _
12derive newtype instance eqFolder ∷ Eq Folder
14foreign import copyImpl ∷ Fn2 String String (Promise Unit)
16copy ∷ String -> String -> Aff Unit
17copy src target = runFn2 copyImpl src target # toAff